From 5ff33f47be003088bd5a5b0e5b7c35a83151a751 Mon Sep 17 00:00:00 2001 From: aarne Date: Thu, 20 Dec 2012 16:05:34 +0000 Subject: added alltenses to the default search path (just like prelude) --- src/compiler/GF/Infra/UseIO.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/compiler/GF/Infra') diff --git a/src/compiler/GF/Infra/UseIO.hs b/src/compiler/GF/Infra/UseIO.hs index dec2269fd..756df0679 100644 --- a/src/compiler/GF/Infra/UseIO.hs +++ b/src/compiler/GF/Infra/UseIO.hs @@ -70,7 +70,8 @@ getLibraryDirectory opts = getGrammarPath :: FilePath -> IO [FilePath] getGrammarPath lib_dir = do - catch (fmap splitSearchPath $ getEnv gfGrammarPathVar) (\_ -> return [lib_dir "prelude"]) -- e.g. GF_GRAMMAR_PATH + catch (fmap splitSearchPath $ getEnv gfGrammarPathVar) + (\_ -> return [lib_dir "alltenses",lib_dir "prelude"]) -- e.g. GF_GRAMMAR_PATH -- | extends the search path with the -- 'gfLibraryPath' and 'gfGrammarPathVar' -- cgit v1.2.3