From caef362065f3965107b0d5619b5d7bbb3d3b1889 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Mon, 23 Jul 2007 00:19:00 +0000
Subject: Renamed parseFromStr -> parseFromString.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@779 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 src/Text/Pandoc/ParserCombinators.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/Text/Pandoc/ParserCombinators.hs')

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
-- 
cgit v1.2.3