[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