Remove obsolescent files (#1105)

src/alire/alire-paths.ads

@@ -11,8 +11,7 @@ package Alire.Paths with Preelaborate is
 
    Temp_Folder_Inside_Working_Folder : constant Relative_Path := "tmp";
 
-   function Working_Folder_Inside_Root return Relative_Path
-   is ("alire");
+   Working_Folder_Inside_Root : constant Relative_Path := "alire";
    --  Folder within a working release that will contain metadata/build files,
    --  dependency releases, and session.
 

src/alr/alr-commands-test.adb

@@ -10,6 +10,7 @@ with Alire.Directories;
 with Alire.Index;
 with Alire.Milestones;
 with Alire.OS_Lib.Subprocess;
+with Alire.Paths;
 with Alire.Platforms.Current;
 with Alire.Properties.Actions.Executor;
 with Alire.Releases.Containers;
@@ -18,7 +19,6 @@ with Alire.Solver;
 with Alire.Utils;
 
 with Alr.Files;
-with Alr.Paths;
 with Alr.Testing.Collections;
 with Alr.Testing.Console;
 with Alr.Testing.JUnit;
@@ -33,6 +33,7 @@ package body Alr.Commands.Test is
 
    use type Ada.Containers.Count_Type;
 
+   package Paths    renames Alire.Paths;
    package Platform renames Alire.Platforms.Current;
    package Query    renames Alire.Solver;
 
@@ -322,11 +323,12 @@ package body Alr.Commands.Test is
          end if;
 
          Make_Dir
-           (Create (+R.Base_Folder) / Create (+Paths.Alr_Working_Folder));
+           (Create (+R.Base_Folder)
+            / Create (+Paths.Working_Folder_Inside_Root));
          --  Might not exist for system/failed/skipped
-         Output.Write (R.Base_Folder /
-                         Paths.Alr_Working_Folder /
-                           "alr_test_" & Timestamp & ".log");
+         Output.Write (R.Base_Folder
+                       / Paths.Working_Folder_Inside_Root
+                       / "alr_test_" & Timestamp & ".log");
       end Test_Release;
 
    begin

src/alr/alr-commands-version.adb

@@ -8,7 +8,6 @@ with Alire.Toolchains;
 with Alire.Utils.Tables;
 
 with Alr.Bootstrap;
-with Alr.Paths;
 
 with GNAT.Compiler_Version;
 with GNAT.Source_Info;
@@ -51,7 +50,7 @@ package body Alr.Commands.Version is
 
       Table.Append ("").New_Row;
       Table.Append ("CONFIGURATION").New_Row;
-      Table.Append ("config folder:").Append (Paths.Alr_Config_Folder).New_Row;
+      Table.Append ("config folder:").Append (Alire.Config.Edit.Path).New_Row;
       Table.Append ("force flag:").Append (Alire.Force'Image).New_Row;
       Table.Append ("non-interactive flag:")
         .Append (CLIC.User_Input.Not_Interactive'Image).New_Row;