(htest) Text.hs: fix typo in comment

[ganeti-local] / htest / Test / Ganeti / Daemon.hs

diff --git a/htest/Test/Ganeti/Daemon.hs b/htest/Test/Ganeti/Daemon.hs
index fb6cc75..e883e39 100644 (file)
--- a/htest/Test/Ganeti/Daemon.hs
+++ b/htest/Test/Ganeti/Daemon.hs
@@ -38,6 +38,8 @@ import Test.Ganeti.Common
 import Ganeti.Common
 import Ganeti.Daemon as Daemon
 
+{-# ANN module "HLint: ignore Use camelCase" #-}
+
 -- | Test a few string arguments.
 prop_string_arg :: String -> Property
 prop_string_arg argument =
@@ -65,7 +67,7 @@ case_bool_arg =
 
 -- | Tests a few invalid arguments.
 case_wrong_arg :: Assertion
-case_wrong_arg = do
+case_wrong_arg =
   mapM_ (passFailOpt defaultOptions assertFailure (return ()))
         [ (oSyslogUsage, "foo", "yes")
         , (oPort 0,      "x",   "10")
@@ -74,7 +76,7 @@ case_wrong_arg = do
 -- | Test that the option list supports some common options.
 case_stdopts :: Assertion
 case_stdopts =
-  checkEarlyExit defaultOptions "prog" [oShowHelp, oShowVer]
+  checkEarlyExit defaultOptions "prog" [oShowHelp, oShowVer] []
 
 testSuite "Daemon"
           [ 'prop_string_arg