[project @ 2002-08-30 14:19:18 by simonpj]

Extra space after $ to avoid conflict with Template Haskell

diff --git a/Text/ParserCombinators/Parsec/Perm.hs b/Text/ParserCombinators/Parsec/Perm.hs
index 6ccbec3..cbdbfe0 100644 (file)
--- a/Text/ParserCombinators/Parsec/Perm.hs
+++ b/Text/ParserCombinators/Parsec/Perm.hs
@@ -102,7 +102,7 @@ add perm@(Perm mf fs) p
 
 addopt :: PermParser tok st (a -> b) -> a -> GenParser tok st a -> PermParser tok st b
 addopt perm@(Perm mf fs) x p
-  = Perm (fmap ($x) mf) (first:map insert fs)
+  = Perm (fmap ($ x) mf) (first:map insert fs)
   where
     first   = Branch perm p
     insert (Branch perm' p')