Commits

Bryan O'Sullivan  committed 6a70dd3

Oops!

  • Participants
  • Parent commits 6668b6f

Comments (0)

Files changed (1)

File Criterion/Main.hs

 printBanner cfg =
     case cfgBanner cfg of
       Last (Just b) -> note cfg b
-      _             -> note cfg "hi mom!"
+      _             -> note cfg "Hey, nobody told me what version I am!\n"
 
 printUsage :: [OptDescr (IO Config)] -> ExitCode -> IO a
 printUsage options exitCode = do