From d327d9da6c25349757fb87f4cc8bcb3ba69ca8f4 Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Mon, 20 Oct 2008 14:52:50 +0000
Subject: Added --parser=ondemand flag.

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

(limited to 'src/GF/Source')

diff --git a/src/GF/Source/GrammarToSource.hs b/src/GF/Source/GrammarToSource.hs
index bf3b92222..fa879cf23 100644
--- a/src/GF/Source/GrammarToSource.hs
+++ b/src/GF/Source/GrammarToSource.hs
@@ -133,7 +133,7 @@ trPerh p = case p of
   _ -> P.EMeta ---
 
 trFlags :: Options -> [P.TopDef]
-trFlags = map trFlag . moduleOptionsGFO
+trFlags = map trFlag . optionsGFO
 
 trFlag :: (String,String) -> P.TopDef
 trFlag (f,x) = P.DefFlag [P.FlagDef (tri $ identC (BS.pack f)) (tri $ identC (BS.pack x))]
-- 
cgit v1.2.3