diff --git a/main.rkt b/main.rkt
index 44fd848..d0da0ae 100644
--- a/main.rkt
+++ b/main.rkt
@@ -93,7 +93,8 @@
   (λ (cmd exit-code result output out info)
     (cond
       ((= exit-code 1) (git-displ out) #t)
-      (std-process-git-result cmd exit-code result output out)))
+      (else 
+       (std-process-git-result cmd exit-code result output out info))))
   )
 
 (def-cmd git-push cmd-git-push 'push add-porcelain)