From 0fdbd51de04949c6a74d5a7c9ae4d808ca0e086e Mon Sep 17 00:00:00 2001 From: Lennart Spitzner Date: Thu, 6 Feb 2020 20:28:53 +0100 Subject: [PATCH] Revert embarrassing debugging leftover that breaks things badly --- src/Language/Haskell/Brittany/Internal.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/src/Language/Haskell/Brittany/Internal.hs b/src/Language/Haskell/Brittany/Internal.hs index 7033354..1d9266f 100644 --- a/src/Language/Haskell/Brittany/Internal.hs +++ b/src/Language/Haskell/Brittany/Internal.hs @@ -474,7 +474,6 @@ ppModule lmod@(L _loc _m@(HsModule _name _exports _ decls _ _)) = do $ mconcat (catMaybes (mBindingConfs ++ [mDeclConf])) let exactprintOnly = config' & _conf_roundtrip_exactprint_only & confUnpack - when exactprintOnly $ mTell $ Text.Builder.fromText $ Text.pack "abc" toLocal config' filteredAnns $ do bd <- if exactprintOnly then briDocMToPPM $ briDocByExactNoComment decl