From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 13 Aug 2013 19:56:16 +0000 (+0100)
Subject: promote cmdoutput nfc
X-Git-Tag: debian/0.1~9
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=7969c5b08add442b930ac674ad8dc1607b2063c5;p=dgit.git

promote cmdoutput nfc
---

diff --git a/dgit b/dgit
index 4491c967..fef71e54 100755
--- a/dgit
+++ b/dgit
@@ -42,6 +42,22 @@ sub url_get {
 
 our ($dscdata,$dscurl,$dsc);
 
+sub runcmd {
+    $!=0; $?=0;
+    die "@_ $! $?" if system @_;
+}
+
+sub cmdoutput {
+    open P, "-|", @_ or die $!;
+    my $d;
+    $!=0; $?=0;
+    { local $/ = undef; $d = <P>; }
+    die if P->error;
+    close P or die "@_ $? $!";
+    chomp $d;
+    return $d;
+}
+
 sub parsecontrol {
     my $c = Dpkg::Control::Hash->new();
     $c->load(@_) or return undef;
@@ -87,22 +103,6 @@ sub check_for_git () {
     return $r+0;
 }
 
-sub runcmd {
-    $!=0; $?=0;
-    die "@_ $! $?" if system @_;
-}
-
-sub cmdoutput {
-    open P, "-|", @_ or die $!;
-    my $d;
-    $!=0; $?=0;
-    { local $/ = undef; $d = <P>; }
-    die if P->error;
-    close P or die "@_ $? $!";
-    chomp $d;
-    return $d;
-}
-
 our ($dsc_hash,$lastupl_hash);
 
 sub generate_commit_from_dsc () {