From c9f48c3e42851c22790c08ec77be7844e5c44e12 Mon Sep 17 00:00:00 2001 From: agl <agl@imperialviolet.org> Date: Mon, 31 Dec 2007 17:47:09 +0000 Subject: [PATCH] Ticket 176: Fix verbosity error to include the valid -v values Fixed: http://hackage.haskell.org/trac/hackage/ticket/176 --- Distribution/Verbosity.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Distribution/Verbosity.hs b/Distribution/Verbosity.hs index d03d81222a..2455332c6e 100644 --- a/Distribution/Verbosity.hs +++ b/Distribution/Verbosity.hs @@ -98,7 +98,8 @@ flagToVerbosity (Just s) [(i, "")] -> case intToVerbosity i of Just v -> v - Nothing -> error ("Bad verbosity " ++ show i) + Nothing -> error ("Bad verbosity: " ++ show i ++ + ". Valid values are 0..3") _ -> error ("Can't parse verbosity " ++ s) showForCabal, showForGHC :: Verbosity -> String -- GitLab