diff options
| author | Sergei Trofimovich <slyfox@gentoo.org> | 2014-08-07 18:48:03 +0300 |
|---|---|---|
| committer | Sergei Trofimovich <slyfox@gentoo.org> | 2014-08-07 18:48:03 +0300 |
| commit | af1fc53a157c179854fd0e03e0a8e17c2295e547 (patch) | |
| tree | 2e02ddeb995fb16fb9233e4830f72bcf67e61f82 /ghc | |
| parent | c51498baf3c75c7364ca063a6d33b0587bd4b2ab (diff) | |
| download | haskell-af1fc53a157c179854fd0e03e0a8e17c2295e547.tar.gz | |
ghci: tweak option list indentation in ':show packages'
Summary:
Caught by './validate --slow' in 'ghci/scripts/ghci024'.
Commit 207875293fea07aa90efe215369629b657d1875a changed indentation a bit:
--- ./ghci/scripts/ghci024.stdout 2014-07-31 12:05:34.000000000 +0300
+++ ./ghci/scripts/ghci024.run.stdout 2014-08-07 17:19:23.000000000 +0300
@@ -33,4 +33,4 @@
active package flags: none
~~~~~~~~~~ Testing :show packages, including the ghc package
active package flags:
- -package ghc
+-package ghc
Patch restores indentation.
Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
Test Plan: passed validate, tested manually
Reviewers: austin, ezyang
Reviewed By: ezyang
Subscribers: phaskell, simonmar, relrod, ezyang, carter
Differential Revision: https://phabricator.haskell.org/D126
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/InteractiveUI.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 386d4df17d..3d871d9d1d 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -2331,9 +2331,9 @@ showPackages :: GHCi () showPackages = do dflags <- getDynFlags let pkg_flags = packageFlags dflags - liftIO $ putStrLn $ showSDoc dflags $ vcat $ - text ("active package flags:"++if null pkg_flags then " none" else "") - : map pprFlag pkg_flags + liftIO $ putStrLn $ showSDoc dflags $ + text ("active package flags:"++if null pkg_flags then " none" else "") $$ + nest 2 (vcat (map pprFlag pkg_flags)) showPaths :: GHCi () showPaths = do |