summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2016-12-03 22:39:25 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-25 17:07:40 +0100
commit62b30d841823f6b9452e5a3d26b2ef5b52ca531c (patch)
tree6dca582abe69b44b4190d62b85abfff6a3880723 /src/Text/Pandoc
parentd7583f365951373158a55ce344ba6b345ea481ec (diff)
Give source position for include file loop.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index abc37001c..222b91e5d 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -960,7 +960,7 @@ include = do
mconcat <$> forM fs' (\f -> do
containers <- stateContainers <$> getState
when (f `elem` containers) $
- throwError $ PandocParseError $ "Include file loop in " ++ f
+ throwError $ PandocParseError $ "Include file loop at " ++ show oldPos
updateState $ \s -> s{ stateContainers = f : stateContainers s }
contents <- lift $ readTeXFile f
setPosition $ newPos f 1 1