msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

gfLibraryPath is actually an environment variable not a file path. Use the current directory instead.

Browse Source
This commit is contained in:
krasimir
2008-04-22 12:18:39 +00:00
parent 2a7c68ad65
commit 30f221cbb4
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Compile/MkConcrete.hs
View File

@@ -68,7 +68,7 @@ mkCncGroups opts0 ((res,path),files) = do
let opts = addOptions (options [beSilent,pathList path]) opts0 let opts = addOptions (options [beSilent,pathList path]) opts0
let treebank = oElem (iOpt "treebank") opts let treebank = oElem (iOpt "treebank") opts
resf <- useIOE res $ do resf <- useIOE res $ do
(fp,_) <- readFileLibraryIOE gfLibraryPath res (fp,_) <- readFileLibraryIOE "" res
return fp return fp
egr <- appIOE $ shellStateFromFiles opts emptyShellState resf egr <- appIOE $ shellStateFromFiles opts emptyShellState resf
(parser,morpho) <- if treebank then do (parser,morpho) <- if treebank then do