git.iko.soy/typeable/pandoc
on master help sign in
Made pandoc -v more explicit about compiler options.

Resolves Issue #139. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1574 788f1e2b-df1e-0410-8736-df70ead52e1b

commit553d91a15fad4fbf58f6c8e4de8d8ed10c6603cc authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> dateSat 2 May 2009, 02:37 (17 years ago) parentcceede4
1 file changed+6−9
src/pandoc.hs+6−9
src/pandoc.hs+6−9
@@ -33,7 +33,9 @@ module Main where
3333import Text.Pandoc
3434import Text.Pandoc.ODT
3535import Text.Pandoc.Shared ( HTMLMathMethod (..), tabFilter, ObfuscationMethod (..) )
36+#ifdef _HIGHLIGHTING
3637import Text.Pandoc.Highlighting ( languages )
38+#endif
3739import System.Environment ( getArgs, getProgName, getEnvironment )
3840import System.Exit ( exitWith, ExitCode (..) )
3941import System.FilePath
@@ -59,18 +61,13 @@ copyrightMessage = "\nCopyright (C) 2006-8 John MacFarlane\n" ++
5961compileInfo :: String
6062compileInfo =
6163#ifdef _CITEPROC
62− " +citeproc" ++
63−#else
64− " -citeproc" ++
64+ "\nCompiled with citeproc support." ++
6565#endif
6666#ifdef _HIGHLIGHTING
67− " +highlighting" ++
68−#else
69− " -highlighting" ++
67+ "\nCompiled with syntax highlighting support for:\n" ++
68+ wrapWords 78 languages ++
7069#endif
71− if null languages
72− then "\n"
73− else "\nCompiled with syntax highlighting support for:\n" ++ wrapWords 78 languages
70+ ""
7471
7572-- | Converts a list of strings into a single string with the items printed as
7673-- comma separated words in lines with a maximum line length.