Commit af1fc53a authored by Sergei Trofimovich's avatar Sergei Trofimovich

ghci: tweak option list indentation in ':show packages'

Summary:
Caught by './validate --slow' in 'ghci/scripts/ghci024'.

Commit 20787529 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: default avatarSergei 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
parent c51498ba
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment