diff --git a/hledger/Hledger/Cli/Options.hs b/hledger/Hledger/Cli/Options.hs
index aba9e84fa..75211a2dc 100644
--- a/hledger/Hledger/Cli/Options.hs
+++ b/hledger/Hledger/Cli/Options.hs
@@ -722,6 +722,8 @@ showModeHelp =
   .
   (helpText [] HelpFormatDefault :: Mode a -> [Text])
 
+-- not used:
+
 -- | Print debug info about arguments and options if --debug is present.
 debugArgs :: [String] -> CliOpts -> IO ()
 debugArgs args opts =
@@ -733,6 +735,8 @@ debugArgs args opts =
     d <- getCurrentDay
     putStrLn $ "search query: " ++ (show $ queryFromOpts d $ reportopts_ opts)
 
+-- not used:
+
 -- | Parse hledger CLI options from the command line using the given
 -- cmdargs mode, and either return them or, if a help flag is present,
 -- print the mode help and exit the program.