From 4631e83dad16526a9a1e399520738b6a756cc457 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Thu, 22 Oct 2020 15:49:49 -0400 Subject: [PATCH] :fire: redundant parens. --- src/Facet/REPL.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Facet/REPL.hs b/src/Facet/REPL.hs index 0c27fb7a7..c5b607285 100644 --- a/src/Facet/REPL.hs +++ b/src/Facet/REPL.hs @@ -159,7 +159,7 @@ loop = do Paths -> do searchPaths <- gets (toList . searchPaths) unless (null searchPaths) - $ print $ pretty "search paths:" <\> (nest 2 (unlines (map pretty searchPaths))) + $ print $ pretty "search paths:" <\> nest 2 (unlines (map pretty searchPaths)) -- FIXME: show module names Modules -> gets (unlines . map pretty . Map.keys . files) >>= print Add Paths path -> searchPaths_ %= Set.insert path