aboutsummaryrefslogtreecommitdiff
path: root/src/pandoc.hs
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-05-02 02:37:38 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2009-05-02 02:37:38 +0000
commit553d91a15fad4fbf58f6c8e4de8d8ed10c6603cc (patch)
tree9f0dc7c6e178f9aef995c86aad9a8fddf479b2a0 /src/pandoc.hs
parentcceede4ca20f1f362b7bc6868618177f9c7b4bab (diff)
downloadpandoc-553d91a15fad4fbf58f6c8e4de8d8ed10c6603cc.tar.gz
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
Diffstat (limited to 'src/pandoc.hs')
-rw-r--r--src/pandoc.hs15
1 files changed, 6 insertions, 9 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs
index b4f54b7c1..c57cf8b5a 100644
--- a/src/pandoc.hs
+++ b/src/pandoc.hs
@@ -33,7 +33,9 @@ module Main where
import Text.Pandoc
import Text.Pandoc.ODT
import Text.Pandoc.Shared ( HTMLMathMethod (..), tabFilter, ObfuscationMethod (..) )
+#ifdef _HIGHLIGHTING
import Text.Pandoc.Highlighting ( languages )
+#endif
import System.Environment ( getArgs, getProgName, getEnvironment )
import System.Exit ( exitWith, ExitCode (..) )
import System.FilePath
@@ -59,18 +61,13 @@ copyrightMessage = "\nCopyright (C) 2006-8 John MacFarlane\n" ++
compileInfo :: String
compileInfo =
#ifdef _CITEPROC
- " +citeproc" ++
-#else
- " -citeproc" ++
+ "\nCompiled with citeproc support." ++
#endif
#ifdef _HIGHLIGHTING
- " +highlighting" ++
-#else
- " -highlighting" ++
+ "\nCompiled with syntax highlighting support for:\n" ++
+ wrapWords 78 languages ++
#endif
- if null languages
- then "\n"
- else "\nCompiled with syntax highlighting support for:\n" ++ wrapWords 78 languages
+ ""
-- | Converts a list of strings into a single string with the items printed as
-- comma separated words in lines with a maximum line length.