aboutsummaryrefslogtreecommitdiff
path: root/pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2016-05-11 17:43:47 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2016-05-11 17:43:47 -0700
commit1ddc71e01ec8b958daa90c0b9397d05b43c2a140 (patch)
treedbc3bd064cada913d799d9210e334c955bb9e5f4 /pandoc.hs
parentee45be5723ef6001ae333110ce45ae2f7b1b17af (diff)
downloadpandoc-1ddc71e01ec8b958daa90c0b9397d05b43c2a140.tar.gz
Added some CSS to handle older versions of process.
`createProcess_` is in Internals until process 1.2.1.
Diffstat (limited to 'pandoc.hs')
-rw-r--r--pandoc.hs7
1 files changed, 6 insertions, 1 deletions
diff --git a/pandoc.hs b/pandoc.hs
index 7a2a38d39..78dcd6840 100644
--- a/pandoc.hs
+++ b/pandoc.hs
@@ -52,8 +52,13 @@ import Data.Char ( toLower, toUpper )
import Data.List ( delete, intercalate, isPrefixOf, isSuffixOf, sort )
import System.Directory ( getAppUserDataDirectory, findExecutable,
doesFileExist, Permissions(..), getPermissions )
-import System.Process ( shell, CreateProcess(..), createProcess_,
+import System.Process ( shell, CreateProcess(..),
waitForProcess, StdStream(CreatePipe) )
+#if MIN_VERSION_process(1,2,1)
+import System.Process ( createProcess_ )
+#else
+import System.Process.Internals ( createProcess_ )
+#endif
import System.IO ( stdout, stderr, hClose )
import System.IO.Error ( isDoesNotExistError )
import qualified Control.Exception as E