Slight edits to a couple error messages.
This commit is contained in:
parent
e57fb8d59d
commit
29086d4a96
1 changed files with 2 additions and 2 deletions
|
@ -409,7 +409,7 @@ options =
|
||||||
"javascript" -> return JavascriptObfuscation
|
"javascript" -> return JavascriptObfuscation
|
||||||
"none" -> return NoObfuscation
|
"none" -> return NoObfuscation
|
||||||
_ -> err 6
|
_ -> err 6
|
||||||
("Error: Unknown obfuscation method: " ++ arg)
|
("Unknown obfuscation method: " ++ arg)
|
||||||
return opt { optEmailObfuscation = method })
|
return opt { optEmailObfuscation = method })
|
||||||
"none|javascript|references")
|
"none|javascript|references")
|
||||||
"" -- "Method for obfuscating email in HTML"
|
"" -- "Method for obfuscating email in HTML"
|
||||||
|
@ -947,7 +947,7 @@ main = do
|
||||||
writerHighlightStyle = highlightStyle }
|
writerHighlightStyle = highlightStyle }
|
||||||
|
|
||||||
when (writerName' `elem` nonTextFormats&& outputFile == "-") $
|
when (writerName' `elem` nonTextFormats&& outputFile == "-") $
|
||||||
err 5 $ "Error: Cannot write " ++ writerName' ++ " output to stdout.\n" ++
|
err 5 $ "Cannot write " ++ writerName' ++ " output to stdout.\n" ++
|
||||||
"Specify an output file using the -o option."
|
"Specify an output file using the -o option."
|
||||||
|
|
||||||
let readSources [] = mapM readSource ["-"]
|
let readSources [] = mapM readSource ["-"]
|
||||||
|
|
Loading…
Reference in a new issue