Removed unneeded 'try' in 'parseFromString'.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@928 788f1e2b-df1e-0410-8736-df70ead52e1b
commitf10ac4359c55d31a198e907c3f30c35eed11ab3e
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
dateTue 28 Aug 2007, 06:02 (19 years ago)
parentda9271c
src/Text/Pandoc/Shared.hs+1−1
@@ -299,7 +299,7 @@ stringAnyCase (x:xs) = do
299299
300300-- | Parse contents of 'str' using 'parser' and return result.
301301parseFromString :: GenParser tok st a -> [tok] -> GenParser tok st a
302−parseFromString parser str = try $ do
302+parseFromString parser str = do
303303 oldInput <- getInput
304304 setInput str
305305 result <- parser