[svk-commit] r2746 - branches/path-resolver/lib/SVK/Editor
nobody at bestpractical.com
nobody at bestpractical.com
Tue Apr 22 05:26:47 EDT 2008
Author: ruz
Date: Tue Apr 22 05:26:47 2008
New Revision: 2746
Modified:
branches/path-resolver/lib/SVK/Editor/Merge.pm
Log:
* use add_directory_back instead of dirty hack we had
Modified: branches/path-resolver/lib/SVK/Editor/Merge.pm
==============================================================================
--- branches/path-resolver/lib/SVK/Editor/Merge.pm (original)
+++ branches/path-resolver/lib/SVK/Editor/Merge.pm Tue Apr 22 05:26:47 2008
@@ -266,27 +266,13 @@
return undef;
}
elsif ( $action eq 'a' ) {
- my $bite_me;
- $logger->error("here we are with $path");
-
- #dirty hacks and most probably stupid thing
- my @dirs = split m{/}, $path; pop @dirs;
- my @to_add;
- while ( @dirs && !defined $self->{'storage_baton'}{ join '/', @dirs } ) {
- unshift @to_add, pop @dirs;
- }
- while ( @to_add ) {
- my $cur = shift @to_add;
- $self->add_directory( join('/', @dirs, $cur), join('/', @dirs), undef, $arg[-1] );
- push @dirs, $cur;
- }
- return $self->add_file( $path, join('/', @dirs), @arg);
+ $self->add_directory_back( $arg[-1] );
}
else {
- die "no such action";
+ die "uknown action";
}
}
- return unless defined $pdir;
+
my $pool = pop @arg;
# a replaced node shouldn't be checked with cb_exist
my $spool = SVN::Pool->new_default($pool);
More information about the svk-commit
mailing list