@@ -171,7 +171,7 @@ flagsToDocs flags docs =
172 case flag of
172 case flag of
173 Flag name (Parser singular _ _ _ _) description ->
173 Flag name (Parser singular _ _ _ _) description ->
174− [ P.dullcyan $ P.text $ "--" ++ name ++ "=<" ++ singular ++ ">"
174+ [ P.dullcyan $ P.text $ "--" ++ name ++ "=" ++ toToken singular
175 , P.indent 4 $ reflow description
175 , P.indent 4 $ reflow description