From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 9 Oct 2013 06:20:25 +0000 (+0100)
Subject: wip changes for remote push - provide i_method
X-Git-Tag: debian/0.16_experimental2^2~15
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=bf3c1aff96cc631d7c3a41ff0e5a52d4574a13a8

wip changes for remote push - provide i_method
---

diff --git a/dgit b/dgit
index bac0baf0..09081053 100755
--- a/dgit
+++ b/dgit
@@ -1370,6 +1370,12 @@ sub i_cleanup {
     eval { rmtree $i_tmp; };
 }
 
+sub i_method {
+    my ($base,$selector,@args) = @_;
+    $selector =~ s/\-/_/g;
+    { no strict qw(refs); &{"${base}_${selector}"}(@args); }
+}
+
 sub cmd_rpush {
     my $host = nextarg;
     my $dir;