From 30f221cbb4b7b80d5273303c5ea9f4aa1fcd5d40 Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Tue, 22 Apr 2008 12:18:39 +0000
Subject: [PATCH] gfLibraryPath is actually an environment variable not a file
 path. Use the current directory instead.

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

diff --git a/src/GF/Compile/MkConcrete.hs b/src/GF/Compile/MkConcrete.hs
index 0124acca6..d016a7e47 100644
--- a/src/GF/Compile/MkConcrete.hs
+++ b/src/GF/Compile/MkConcrete.hs
@@ -68,7 +68,7 @@ mkCncGroups opts0 ((res,path),files) = do
   let opts = addOptions (options [beSilent,pathList path]) opts0
   let treebank = oElem (iOpt "treebank") opts
   resf <- useIOE res $ do
-    (fp,_) <- readFileLibraryIOE gfLibraryPath res
+    (fp,_) <- readFileLibraryIOE "" res
     return fp
   egr <- appIOE $ shellStateFromFiles opts emptyShellState resf
   (parser,morpho) <- if treebank then do