X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=src%2Fparser.mly;h=8b7d8a188e96cbf85805e406b0c25db81b2c3198;hb=84972c63d0dbc5a0da05ae08a5b99a9ad81baadc;hp=b84ac151f228faaad68dbcf950753d33d6deb388;hpb=0a41019f02474e4819ecdd739814b849bc58b84e;p=goals.git

diff --git a/src/parser.mly b/src/parser.mly
index b84ac15..8b7d8a1 100644
--- a/src/parser.mly
+++ b/src/parser.mly
@@ -40,7 +40,7 @@ let find_on_include_path filename =
   )
 
 let do_include env loc filename optflag file =
-  let filename = Ast.substitute env loc filename in
+  let filename = Eval.substitute env loc filename in
   let filename = find_on_include_path filename in
   if optflag && not (Sys.file_exists filename) then env
   else (