chiark / gitweb /
Break out commit_admin (nfc)
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 27 Oct 2014 17:44:42 +0000 (17:44 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 5 Nov 2014 18:02:50 +0000 (18:02 +0000)
dgit

diff --git a/dgit b/dgit
index e74445b..9d8f9d4 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -1366,6 +1366,12 @@ sub check_not_dirty () {
     }
 }
 
+sub commit_admin ($) {
+    my ($m) = @_;
+    progress "$m";
+    runcmd_ordryrun_local @git, qw(commit -m), $m;
+}
+
 sub commit_quilty_patch () {
     my $output = cmdoutput @git, qw(status --porcelain);
     my %adds;
@@ -1380,9 +1386,7 @@ sub commit_quilty_patch () {
        return;
     }
     runcmd_ordryrun_local @git, qw(add), sort keys %adds;
-    my $m = "Commit Debian 3.0 (quilt) metadata";
-    progress "$m";
-    runcmd_ordryrun_local @git, qw(commit -m), $m;
+    commit_admin "Commit Debian 3.0 (quilt) metadata";
 }
 
 sub madformat ($) {