Fix location of default install prefix (#1461)

alire-project · Sep 25, 2023 · c6b6474 · c6b6474
1 parent 2e3a520
commit c6b6474
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 3 deletions.
diff --git a/src/alire/alire-install.ads b/src/alire/alire-install.ads
@@ -8,8 +8,11 @@ package Alire.Install is
 
    --  Support for installation prefixes
 
-   Default_Prefix : constant Absolute_Path
-     := Platforms.Folders.Home / ".alire";
+   Default_Prefix_Basename : constant Relative_Path := ".alire";
+   Default_Prefix_Dirname  : constant Absolute_Path := Platforms.Folders.Home;
+
+   Default_Prefix : constant Absolute_Path :=
+                      Default_Prefix_Dirname / Default_Prefix_Basename;
 
    procedure Add (Prefix : Any_Path;
                   Deps   : Dependencies.Containers.List);

diff --git a/src/alr/alr-commands-install.adb b/src/alr/alr-commands-install.adb
@@ -136,7 +136,8 @@ package body Alr.Commands.Install is
                      Cmd.Prefix'Access,
                      "", "--prefix=",
                      "Override installation prefix (default is "
-                     & TTY.URL ("${CRATE_ROOT}/alire/prefix)") & ")");
+                     & TTY.URL ("${HOME}/" &
+                         Alire.Install.Default_Prefix_Basename) & ")");
 
       Define_Switch (Config,
                      Cmd.Info'Access,