diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-01-22 22:52:39 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-01-22 22:52:39 +0000 |
commit | 1121e8738b3d2a60c5762be03a2f6b33adae77ab (patch) | |
tree | eeb7fd188c585f099a65a5d55f675cae5cbb3b89 /src/Text/Pandoc/Readers | |
parent | 8f0750574ac1702d27bf9a98ccce3962ad0b587c (diff) | |
download | pandoc-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.hs | 2 | ||||
-rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
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 "\"" """ tit + let tit' = substitute "\"" """ tit return tit') title = choice [ titleWith '(' ')', |