native::DeltaSection: User Contributed Perl Documentation (3)Updated: 2004-09-06 |
native::DeltaSection: User Contributed Perl Documentation (3)Updated: 2004-09-06 |
require SVN::Core;
require SVN::Repos;
require SVN::Delta;
# driving an editor
my $editor = SVN::Delta::Editor->
new(SVN::Repos::get_commit_editor($repos, "file://$repospath",
'/', 'root', 'FOO', \&committed));
my $rootbaton = $editor->open_root(0);
my $fbaton = $editor->add_file ('filea', $rootbaton,
undef, -1);
my $ret = $editor->apply_textdelta ($fbaton, undef);
SVN::TxDelta::send_string("FILEA CONTENT", @$ret);
# implement an editor in perl
SVN::Repos::dir_delta($root1, $path, undef,
$root2, $path,
SVN::Delta::Editor->new(_debug=>1),
1, 1, 0, 1
You can also pass a hash array to new:
If you are subclassing, the methods take exactly the same arguments as the member functions (note that void ** are returned data though as throughout the perl bindings), with the edit_baton omitted.
This software is licensed as described in the file COPYING, which you should have received as part of this distribution. The terms are also available at http://subversion.tigris.org/license-1.html. If newer versions of this license are posted there, you may use a newer version instead, at your option.
This software consists of voluntary contributions made by many individuals. For exact contribution history, see the revision history and logs, available at http://subversion.tigris.org/.