diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-23 00:19:00 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-23 00:19:00 +0000 |
commit | caef362065f3965107b0d5619b5d7bbb3d3b1889 (patch) | |
tree | 97d79f749eef1516e1f6e15dd0dd25f6e6d28697 /src/Text/Pandoc/ParserCombinators.hs | |
parent | c1c30a76640cff5a052178fba879ca67ab7c0cd4 (diff) | |
download | pandoc-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.hs | 6 |
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 |