From 7969c5b08add442b930ac674ad8dc1607b2063c5 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 13 Aug 2013 20:56:16 +0100
Subject: [PATCH] promote cmdoutput nfc

---
 dgit | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

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 () {
-- 
2.30.2