diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-07-17 14:25:50 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-07-31 21:50:00 +0100 |
commit | 79efde94a4372533a4cc1d1a48634eecdeef41e1 (patch) | |
tree | 692dcde77395df4d70a8cbd7843f0946c91fbc5a /Debian/Dgit.pm | |
parent | 2fe42d36da42a62e8082d0d1c4c35943e8281e9e (diff) |
Tag change: Make git_for_each_ref support multiple patterns
By passing $patterns= [ ... ]. No functional change yet as no call
site does this.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'Debian/Dgit.pm')
-rw-r--r-- | Debian/Dgit.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm index fb983c1..863d1ad 100644 --- a/Debian/Dgit.pm +++ b/Debian/Dgit.pm @@ -266,7 +266,9 @@ sub git_for_each_ref ($$;$) { # calls $func->($objid,$objtype,$fullrefname,$reftail); # $reftail is RHS of ref after refs/[^/]+/ # breaks if $pattern matches any ref `refs/blah' where blah has no `/' - my @cmd = (qw(git for-each-ref), $pattern); + # $pattern may be an array ref to mean multiple patterns + $pattern = [ $pattern ] unless ref $pattern; + my @cmd = (qw(git for-each-ref), @$pattern); if (defined $gitdir) { @cmd = ('sh','-ec','cd "$1"; shift; exec "$@"','x', $gitdir, @cmd); } |