Alire.Index_On_Disk: improve error message (#1579)

alire-project · Feb 23, 2024 · 1439890 · 1439890
1 parent 13b8324
commit 1439890
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/alire/alire-index_on_disk.adb b/src/alire/alire-index_on_disk.adb
@@ -99,7 +99,8 @@ package body Alire.Index_On_Disk is
       return Outcome_Success;
    exception
       when E : others =>
-         return Outcome_From_Exception (E, "Could not delete index directory");
+         return Outcome_From_Exception
+           (E, "Could not delete index directory: " & This.Metadata_Directory);
    end Delete;
 
    ----------