[PATCH 1/4] git-svn: let libsvn_ls_fullurl return properties too
From: Sam Vilain <hidden>
Date: 2016-08-11 19:48:02
Subsystem:
the rest · Maintainer:
Linus Torvalds
Allow an extra parameter to be passed to the libsvn_ls_fullurl function to collect and return the properties of the URL being listed. --- git-svn.perl | 7 ++++--- 1 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/git-svn.perl b/git-svn.perl
index 3891122..93cfcc4 100755
--- a/git-svn.perl
+++ b/git-svn.perl@@ -3321,18 +3321,19 @@ sub libsvn_commit_cb { sub libsvn_ls_fullurl { my $fullurl = shift; + my $want_props = shift; my $ra = libsvn_connect($fullurl); - my @ret; + my (@ret, @props); my $pool = SVN::Pool->new; my $r = defined $_revision ? $_revision : $ra->get_latest_revnum; - my ($dirent, undef, undef) = $ra->get_dir('', $r, $pool); + my ($dirent, undef, $props) = $ra->get_dir('', $r, $pool); foreach my $d (keys %$dirent) { if ($dirent->{$d}->kind == $SVN::Node::dir) { push @ret, "$d/"; # add '/' for compat with cli svn } } $pool->clear; - return @ret; + return ($want_props ? (\@ret, $props) : @ret); }
--
1.4.4.1.ge918e-dirty