@@ -478,7 +478,7 @@ options =
478478 case safeRead ("Wrap" ++ uppercaseFirstLetter arg) of
479479 Just o -> return opt { optWrapText = o }
480480 Nothing -> err 77 "--wrap must be auto, none, or preserve")
481− "[auto|none|preserve]")
481+ "auto|none|preserve")
482482 "" -- "Option for wrapping text in output"
483483
484484 , Option "" ["columns"]
@@ -609,7 +609,7 @@ options =
609609 Just tlDiv -> return opt { optTopLevelDivision = tlDiv }
610610 _ -> err 76 ("Top-level division must be " ++
611611 "section, chapter, part, or default"))
612− "[section|chapter|part]")
612+ "section|chapter|part")
613613 "" -- "Use top-level division type in LaTeX, ConTeXt, DocBook"
614614
615615 , Option "N" ["number-sections"]
@@ -912,6 +912,7 @@ options =
912912 UTF8.hPutStrLn stdout $ printf tpl allopts
913913 (unwords (map fst readers))
914914 (unwords (map fst writers))
915+ (unwords $ map fst highlightingStyles)
915916 ddir
916917 exitSuccess ))
917918 "" -- "Print bash completion script"