Require random >= 1.3 and use `splitGen`.

`split` has been deprecated.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/Text/Pandoc/Class/PandocPure.hs b/src/Text/Pandoc/Class/PandocPure.hs
index c86b20a05..c026d89f5 100644
--- a/src/Text/Pandoc/Class/PandocPure.hs
+++ b/src/Text/Pandoc/Class/PandocPure.hs
@@ -49,7 +49,7 @@ import Data.Word (Word8)
 import System.Directory (doesDirectoryExist, getDirectoryContents)
 import System.FilePath ((</>))
 import System.FilePath.Glob (match, compile)
-import System.Random (StdGen, split, mkStdGen)
+import System.Random (StdGen, splitGen, mkStdGen)
 import Text.Pandoc.Class.CommonState (CommonState (..))
 import Text.Pandoc.Class.PandocMonad
 import Text.Pandoc.Error
@@ -180,7 +180,7 @@ instance PandocMonad PandocPure where
 
   newStdGen = do
     oldGen <- getsPureState stStdGen
-    let (genToStore, genToReturn) = split oldGen
+    let (genToStore, genToReturn) = splitGen oldGen
     modifyPureState $ \st -> st { stStdGen = genToStore }
     return genToReturn