From 23ac09baddf9727179422dc53f3068676e1798f4 Mon Sep 17 00:00:00 2001
From: Michal Terepeta <michal.terepeta@gmail.com>
Date: Sat, 30 Jan 2010 22:44:52 +0100
Subject: Partial fix for issue 14.

Ignore-this: 93060e4b19a975843eaab1185af52545

darcs-hash:20100130214452-c9c37-5b222060fbac6ea2f470224da766c6c3577a7c37.gz
---
 Parsers.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Parsers.hs b/Parsers.hs
index 58e3bcd..48c5748 100644
--- a/Parsers.hs
+++ b/Parsers.hs
@@ -51,7 +51,7 @@ textParser c = do s <- many1 $
 --   accepts only parsers with return type Char.
 notFollowedBy' :: Parser a -> Parser b -> Parser a
 notFollowedBy' p e = do x <- p
-                        notFollowedBy (e >> return '*')
+                        notFollowedBy $ try (e >> return '*')
                         return x
 
 -- | Parsers a string wrapped in a color specification.
-- 
cgit v1.2.3