diff options
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -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; |