diff --git a/src/full/Agda/Interaction/Library.hs b/src/full/Agda/Interaction/Library.hs index 30e50da0a..b249344f3 100644 --- a/src/full/Agda/Interaction/Library.hs +++ b/src/full/Agda/Interaction/Library.hs @@ -160,7 +160,7 @@ raiseErrors = tell . map Left getAgdaAppDir :: IO FilePath getAgdaAppDir = do -- System-specific command to build the path to ~/.agda (Unix) or %APPDATA%\agda (Win) - let agdaDir = getAppUserDataDirectory "agda" + let agdaDir = canonicalizePath "/usr/share/agda" -- The default can be overwritten by setting the AGDA_DIR environment variable caseMaybeM (lookupEnv "AGDA_DIR") agdaDir $ \ dir -> ifM (doesDirectoryExist dir) (canonicalizePath dir) $ do