[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