75c7800 · typeable/pandoc

git.iko.soy/typeable/pandoc

Don't return an error status on --help or --version.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1551 788f1e2b-df1e-0410-8736-df70ead52e1b

commit75c7800d90446f24bd6819360b7d6967db35d9b7 authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> dateThu 26 Feb 2009, 16:47 (18 years ago) parent24cb44a

1 file changed+4−4

compare with master

unifiedsplit

src/pandoc.hs+4−4

src/pandoc.hs+4−4

@@ -412,17 +412,17 @@ options =

412412 (NoArg

413413 (\_ -> do

414414 prg <- getProgName

415− hPutStrLn stderr (prg ++ " " ++ pandocVersion ++ compileInfo ++

415+ hPutStrLn stdout (prg ++ " " ++ pandocVersion ++ compileInfo ++

416416 copyrightMessage)

417− exitWith $ ExitFailure 4))

417+ exitWith ExitSuccess ))

418418 "" -- "Print version"

419419

420420 , Option "h" ["help"]

421421 (NoArg

422422 (\_ -> do

423423 prg <- getProgName

424− hPutStr stderr (usageMessage prg options)

425− exitWith $ ExitFailure 2))

424+ hPutStr stdout (usageMessage prg options)

425+ exitWith ExitSuccess ))

426426 "" -- "Show help"

427427 ]

428428