chiark / gitweb /
abolish run_git_1line ExitStatus
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 21 Jan 2012 01:03:41 +0000 (01:03 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 21 Jan 2012 01:03:41 +0000 (01:03 +0000)
Topbloke.pm

index 6e9d727..b8f21a0 100644 (file)
@@ -18,19 +18,9 @@ BEGIN {
 
 
 sub run_git_1line {
-    my $xopts;
-    $xopts = ref $_[0] ? shift @_ : { };
     open GIT, "-|", 'git', @_ or die $!;
     my $l = <GIT>;
     $?=0;
-    if ($xopts->{ExitStatus}) {
-       if (!close GIT) { 
-           return ($?, undef);
-       } else {
-           chomp $l or die "@_ ?";
-           return (0, $l);
-       }
-    }
     close GIT or die "git @_ failed ($?)\n";
     chomp $l or die "@_ ?";
     return $l;