summaryrefslogtreecommitdiff
path: root/Text/Pandoc/Readers/RDF.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Text/Pandoc/Readers/RDF.hs')
-rw-r--r--Text/Pandoc/Readers/RDF.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Text/Pandoc/Readers/RDF.hs b/Text/Pandoc/Readers/RDF.hs
index 0d9aa26..e2b21d0 100644
--- a/Text/Pandoc/Readers/RDF.hs
+++ b/Text/Pandoc/Readers/RDF.hs
@@ -48,7 +48,6 @@ import System.Directory ( getXdgDirectory, XdgDirectory(..)
, createDirectoryIfMissing )
import Control.Monad (zipWithM)
import Data.Maybe (mapMaybe)
-import Control.DeepSeq
import Redland
@@ -159,8 +158,7 @@ readRDF bu rf t = do
createDirectoryIfMissing True cacheDir
withWSMU "hashes" [("hash-type", "bdb"), ("dir", cacheDir)]
"rdf-cache" "" (uriToString id bu "") $ \world' _ model' _ -> do
- r <- mapM (readTriple (world', model')) $ prepareTriples triples
- r `deepseq` pure r
+ mapM (readTriple (world', model')) $ prepareTriples triples
readTriple :: ( ForeignPtr RedlandWorld
, ForeignPtr RedlandModel)
-> Triple