Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal On branch : master
http://hackage.haskell.org/trac/ghc/changeset/c0cea6ea7c90eab7be25114cf93da5d7836241c9 >--------------------------------------------------------------- commit c0cea6ea7c90eab7be25114cf93da5d7836241c9 Author: Duncan Coutts <[email protected]> Date: Thu May 3 19:33:48 2007 +0000 Make the -v flag mean -v2 like cabal does, not -v3 This is relevant since we pass on this default verbosity when we call cabal, so it's much better if they match up. >--------------------------------------------------------------- .../src/Network/Hackage/CabalInstall/Setup.hs | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/cabal-install/src/Network/Hackage/CabalInstall/Setup.hs b/cabal-install/src/Network/Hackage/CabalInstall/Setup.hs index 3d4f3d8..fdcc460 100644 --- a/cabal-install/src/Network/Hackage/CabalInstall/Setup.hs +++ b/cabal-install/src/Network/Hackage/CabalInstall/Setup.hs @@ -49,9 +49,9 @@ emptyTempFlags = TempFlags { cmd_verbose :: OptDescr (TempFlags -> TempFlags) cmd_verbose = Option "v" ["verbose"] (OptArg verboseFlag "n") - "Control verbosity (n is 0--5, normal verbosity level is 1, -v alone is equivalent to -v3)" + "Control verbosity (n is 0--5, normal verbosity level is 1, -v alone is equivalent to -v2)" where - verboseFlag mb_s t = t { tempVerbose = maybe 3 read mb_s } + verboseFlag mb_s t = t { tempVerbose = maybe 2 read mb_s } globalOptions :: [OptDescr (TempFlags -> TempFlags)] globalOptions = _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
