diff options
author | Eric Wong <normalperson@yhbt.net> | 2012-09-18 00:09:31 +0000 |
---|---|---|
committer | Eric Wong <normalperson@yhbt.net> | 2012-10-05 22:48:12 +0000 |
commit | f3045919d148b443158d2b64a5a73375286514c1 (patch) | |
tree | 749d9d0abc445bbbf10a47cf6aa9b1fed3cd1b0d /perl | |
parent | 9478b11968d61085bb4c4343395b6f52ce06380f (diff) | |
download | git-f3045919d148b443158d2b64a5a73375286514c1.tar.gz git-f3045919d148b443158d2b64a5a73375286514c1.tar.xz |
git-svn: use path accessor for Git::SVN objects
The accessors should improve maintainability and enforce
consistent access to Git::SVN objects.
Signed-off-by: Eric Wong <normalperson@yhbt.net>
Reviewed-by: Jonathan Nieder <jrnieder@gmail.com>
Diffstat (limited to 'perl')
-rw-r--r-- | perl/Git/SVN/Ra.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Git/SVN/Ra.pm b/perl/Git/SVN/Ra.pm index 90ec30bff..049c97bfa 100644 --- a/perl/Git/SVN/Ra.pm +++ b/perl/Git/SVN/Ra.pm @@ -416,7 +416,7 @@ sub gs_fetch_loop_common { } $SVN::Error::handler = $err_handler; - my %exists = map { $_->{path} => $_ } @$gsv; + my %exists = map { $_->path => $_ } @$gsv; foreach my $r (sort {$a <=> $b} keys %revs) { my ($paths, $logged) = @{$revs{$r}}; |