@@ -45,7 +45,7 @@ lchar = lexeme.char
46loadModule :: FilePath -> Idris ()
46loadModule :: FilePath -> Idris ()
47loadModule f = do datadir <- lift $ getDataDir
47loadModule f = do datadir <- lift $ getDataDir
48− fp <- lift $ findImport [datadir, "."] f
48+ fp <- lift $ findImport [".", datadir] f
49 i <- getIState
49 i <- getIState
50 if (f `elem` imported i)
50 if (f `elem` imported i)
51 then iLOG $ "Already read " ++ f
51 then iLOG $ "Already read " ++ f