aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/ParserCombinators.hs
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-23 00:19:00 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-23 00:19:00 +0000
commitcaef362065f3965107b0d5619b5d7bbb3d3b1889 (patch)
tree97d79f749eef1516e1f6e15dd0dd25f6e6d28697 /src/Text/Pandoc/ParserCombinators.hs
parentc1c30a76640cff5a052178fba879ca67ab7c0cd4 (diff)
downloadpandoc-caef362065f3965107b0d5619b5d7bbb3d3b1889.tar.gz
Renamed parseFromStr -> parseFromString.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@779 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/ParserCombinators.hs')
-rw-r--r--src/Text/Pandoc/ParserCombinators.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/ParserCombinators.hs b/src/Text/Pandoc/ParserCombinators.hs
index c49845597..189f97182 100644
--- a/src/Text/Pandoc/ParserCombinators.hs
+++ b/src/Text/Pandoc/ParserCombinators.hs
@@ -38,7 +38,7 @@ module Text.Pandoc.ParserCombinators (
blanklines,
enclosed,
stringAnyCase,
- parseFromStr,
+ parseFromString,
lineClump,
charsInBalanced
) where
@@ -108,8 +108,8 @@ stringAnyCase (x:xs) = try (do
return (firstChar:rest))
-- | Parse contents of 'str' using 'parser' and return result.
-parseFromStr :: GenParser tok st a -> [tok] -> GenParser tok st a
-parseFromStr parser str = try $ do
+parseFromString :: GenParser tok st a -> [tok] -> GenParser tok st a
+parseFromString parser str = try $ do
oldInput <- getInput
setInput str
result <- parser