Better logging

This commit is contained in:
Alejandro R. Mosteo
2018-01-31 02:36:11 +01:00
parent de6df7b289
commit 8dbc94afe0
4 changed files with 36 additions and 9 deletions
+6 -3
View File
@@ -1,4 +1,3 @@
with Ada.Directories;
with GNAT.OS_Lib;
package body Alire.OS_Lib is
@@ -27,8 +26,12 @@ package body Alire.OS_Lib is
-- FIXME: memory leaks
function Spawn (Command : String;
Arguments : String) return Integer is
(Spawn (Locate_In_Path (Command),
Argument_String_To_List (Arguments).all));
begin
Log ("Spawning: " & Command & " " & Arguments, Verbose);
return
(Spawn (Locate_In_Path (Command),
Argument_String_To_List (Arguments).all));
end Spawn;
-----------
-- Spawn --