Sync-merge.

src/arun-handlers.adb

@@ -58,6 +58,12 @@ package body Arun.Handlers is
       Full_Path :  aliased constant String := L.Find_Full_Path (Command);
    begin
 
+      if Command (1) = '/' then
+         --  If the command starts with a slash, it's likely already a
+         --  full path so just try to execute it!
+         L.Execute (Command, Slices);
+      end if;
+
       if Full_Path /= "" then
          Put_Line ("Should Execute: " & Full_Path);
          L.Execute (Full_Path, Slices);

src/arun.adb

@@ -57,9 +57,10 @@ package body Arun is
       Builder.Launcher.Initialize;
 
       Return_Code :=
-        Add_From_Resource (Builder       => Builder,
-                           Resource_Path => "/io/lasagna/arun/arun.glade",
-                           Error         => Error'Access);
+        Add_From_Resource
+          (Builder       => Builder,
+           Resource_Path => "/io/lasagna/arun/resources/arun.glade",
+           Error         => Error'Access);
       if Error /= null then
          Put_Line ("Error : " & Get_Message (Error));
          Error_Free (Error);