aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-01-22 22:52:39 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-01-22 22:52:39 +0000
commit1121e8738b3d2a60c5762be03a2f6b33adae77ab (patch)
treeeeb7fd188c585f099a65a5d55f675cae5cbb3b89 /src/Text/Pandoc/Readers
parent8f0750574ac1702d27bf9a98ccce3962ad0b587c (diff)
downloadpandoc-1121e8738b3d2a60c5762be03a2f6b33adae77ab.tar.gz
Removed 'gsub' entirely and replaced its uses with 'substitute'.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@501 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs2
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 9e966cc04..38777b003 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -291,7 +291,7 @@ authors = try (do
authors <- manyTill anyChar (char '}')
spaces
let authors' = map removeLeadingTrailingSpace $ lines $
- gsub "\\\\\\\\" "\n" authors
+ substitute "\\\\" "\n" authors
updateState (\state -> state { stateAuthors = authors' })
return Null)
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index aae635663..f32a29274 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -887,7 +887,7 @@ titleWith startChar endChar = try (do
char endChar
skipSpaces
notFollowedBy (noneOf ")\n")))
- let tit' = gsub "\"" "&quot;" tit
+ let tit' = substitute "\"" "&quot;" tit
return tit')
title = choice [ titleWith '(' ')',