[svk-commit] r3141 - branches/delta-refactor/lib/SVK
nobody at bestpractical.com
nobody at bestpractical.com
Sun Nov 9 05:53:19 EST 2008
Author: clkao
Date: Sun Nov 9 05:53:18 2008
New Revision: 3141
Modified:
branches/delta-refactor/lib/SVK/Delta.pm
Log:
use _node_deleted2
Modified: branches/delta-refactor/lib/SVK/Delta.pm
==============================================================================
--- branches/delta-refactor/lib/SVK/Delta.pm (original)
+++ branches/delta-refactor/lib/SVK/Delta.pm Sun Nov 9 05:53:18 2008
@@ -237,17 +237,15 @@
my ($self, $base_root, $base_path, $target, $editor, $ctx) = @_;
my $schedule = $ctx->{cinfo}{'.schedule'} || '';
- # XXX: use a new pool here
local $ctx->{pool} = SVN::Pool->new;
- my %arg = _compat_args(@_);
if ($schedule eq 'delete' || $schedule eq 'replace') {
my $should_do_delete = !$ctx->{_really_in_copy} || $target->copath eq ($ctx->{cinfo}{scheduleanchor} || '');
- $self->_node_deleted(%arg, %$ctx)
+ $self->_node_deleted2($target, $editor, $ctx)
if $should_do_delete;
# when doing add over deleted entry, descend into it
if ($schedule eq 'delete') {
- $self->_unknown_verbose(%arg, %$ctx)
+ $self->_unknown_verbose(%$ctx, _compat_args(@_))
if $self->cb_unknown && $ctx->{unknown_verbose};
return $should_do_delete;
}
@@ -257,7 +255,7 @@
if ($ctx->{kind} && !$schedule &&
(($ctx->{type} eq 'file') xor ($ctx->{kind} == $SVN::Node::file))) {
if ($ctx->{obstruct_as_replace}) {
- $self->_node_deleted(%arg, %$ctx);
+ $self->_node_deleted2($target, $editor, $ctx);
}
else {
$self->cb_obstruct->($editor, $ctx->{entry}, $ctx->{baton})
@@ -269,7 +267,7 @@
else {
# deleted during base_root -> xdroot
if (!$ctx->{base_root_is_xd} && $ctx->{kind} == $SVN::Node::none) {
- $self->_node_deleted(%arg, %$ctx);
+ $self->_node_deleted2($target, $editor, $ctx);
return 1;
}
return 1 if $ctx->{absent_ignore};
@@ -277,7 +275,7 @@
my $type = $ctx->{kind} == $SVN::Node::dir ? 'directory' : 'file';
if ($ctx->{absent_as_delete}) {
- $self->_node_deleted(%arg, %$ctx);
+ $self->_node_deleted2($target, $editor, $ctx);
}
else {
my $func = "absent_$type";
More information about the svk-commit
mailing list