diff options
Diffstat (limited to 'subversion/bindings/swig/perl/native/Ra.pm')
-rw-r--r-- | subversion/bindings/swig/perl/native/Ra.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/subversion/bindings/swig/perl/native/Ra.pm b/subversion/bindings/swig/perl/native/Ra.pm index a03b088..567e0ec 100644 --- a/subversion/bindings/swig/perl/native/Ra.pm +++ b/subversion/bindings/swig/perl/native/Ra.pm @@ -257,9 +257,9 @@ on the directory. This means I<all> properties: not just ones controlled by the user and stored in the repository fs, but non-tweakable ones generated by the SCM system itself (e.g. 'wcprops', 'entryprops', etc). - my ($dirents, undef, $props) = $ra->get_dir('/trunk/dir', 123); + my ($dirents, undef, $props) = $ra->get_dir('trunk/dir', 123); my ($dirents, $fetched_revnum, $props) = $ra->get_dir( - '/trunk/dir', $SVN::Core::INVALID_REVNUM); + 'trunk/dir', $SVN::Core::INVALID_REVNUM); =item $ra-E<gt>get_file($path, $revnum, $fh) @@ -281,15 +281,15 @@ the user and stored in the repository fs, but non-tweakable ones generated by the SCM system itself (e.g. 'wcprops', 'entryprops', etc). my (undef, $props) = $ra->get_file( - '/trunk/foo', 123, undef); + 'trunk/foo', 123, undef); open my $fh, '>', 'tmp_out' or die "error opening file: $!"; my (undef, $props) = $ra->get_file( - '/trunk/foo', 123, $fh); + 'trunk/foo', 123, $fh); my ($fetched_revnum, $props) = $ra->get_file( - '/trunk/foo', $SVN::Core::INVALID_REVNUM, $fh); + 'trunk/foo', $SVN::Core::INVALID_REVNUM, $fh); =item $ra-E<gt>get_file_revs($path, $start, $end, \&callback) |