From e3d854e7aa829cc391ab42811d380c6936ff7e8e Mon Sep 17 00:00:00 2001
From: "R. Tyler Croy" <tyler@monkeypox.org>
Date: Thu, 19 Jan 2017 16:33:27 -0800
Subject: [PATCH] Avoid early return on non-zero gerror

---
 src/arun.adb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/arun.adb b/src/arun.adb
index ce2d3fa..633deba 100644
--- a/src/arun.adb
+++ b/src/arun.adb
@@ -67,7 +67,9 @@ package body Arun is
          return;
       elsif Return_Code /= 0 then
          Put_Line ("Error " & Return_Code'Image);
-         return;
+         --  In normal operations this returns a "1" error, not yet sure what that
+         --  relates to.
+         --  return;
       end if;
 
       Register_Handler (Builder      => Builder,