@@ -36,7 +36,7 @@ getDataFile name = do
37 environment <- tryIOError (getEnv "ELM_HOME")
37 environment <- tryIOError (getEnv "ELM_HOME")
38 case environment of
38 case environment of
39− Right env -> return (env </> name)
39+ Right env -> return (env </> "compiler" </> name)
41 fail $ unlines
41 fail $ unlines
42 [ "Unable to find the ELM_HOME environment variable when searching"
42 [ "Unable to find the ELM_HOME environment variable when searching"