From 203cf1802dc22bc0263f2af113b13ff463564fc3 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 13 Feb 2012 23:06:53 -0600
Subject: better error reporting for git-hub

---
 bin/git/git-hub | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

(limited to 'bin/git')

diff --git a/bin/git/git-hub b/bin/git/git-hub
index 953aa9c..86c7955 100755
--- a/bin/git/git-hub
+++ b/bin/git/git-hub
@@ -91,13 +91,9 @@ sub run_command_delete {
 
     warn "not actually deleting $name (-f not set)\n" unless $force;
 
-    my $response = $self->_github(repo => $name)->repos->delete(
+    $self->_github(repo => $name)->repos->delete(
         $force ? ({confirm => 1}) : ()
     );
-
-    if ($response->{error}) {
-        die "error deleting repository $name: $response->{error}\n";
-    }
 }
 
 sub run_command_fork {
@@ -237,4 +233,7 @@ sub _github {
 
 package main;
 
-App::Git::Hub->new(@ARGV)->run;
+my $res = App::Git::Hub->new(@ARGV)->run;
+if (ref($res) eq 'HASH' && exists $res->{error}) {
+    die $res->{error}[0], "\n";
+}
-- 
cgit v1.2.3-54-g00ecf