From a75c3b1907a814e63cdff9cc045bdcaabe055b8f Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Tue, 20 Jun 2006 15:05:22 +0000
Subject: resource.txt updates ; lock field and lookup book fixes

---
 src/GF/Compile/MkConcrete.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/GF/Compile/MkConcrete.hs')

diff --git a/src/GF/Compile/MkConcrete.hs b/src/GF/Compile/MkConcrete.hs
index 2bd45a4e5..5413d1b79 100644
--- a/src/GF/Compile/MkConcrete.hs
+++ b/src/GF/Compile/MkConcrete.hs
@@ -82,7 +82,7 @@ mkCncGroups opts0 ((res,path),files) = do
       return 
             (\cat s -> 
                 errVal ([],"No parse") $ 
-                optParseArgErrMsg (options [newMParser, firstCat cat, beVerbose]) gr s >>=
+                optParseArgErrMsg (options [newFParser, firstCat cat, beVerbose]) gr s >>=
                 (\ (ts,e) -> return (map tree2exp ts, e)) , 
             isKnownWord gr)
   putStrLn "Building parser"
-- 
cgit v1.2.3