[svk-commit] r2476 - branches/2.0-releng/utils

[nobody at bestpractical.com]

Author: clkao
Date: Tue Jul 17 10:49:47 2007
New Revision: 2476

Modified:
   branches/2.0-releng/utils/verify-mirror

Log:
merge from trunk:
 r2369 at trunk:  clkao | 2007-03-28 12:33:50 +0100
  r8838 at ubuntu:  clkao | 2007-03-28 09:09:40 +0100
  properly translate to local path when mirroring remote root.
 


Modified: branches/2.0-releng/utils/verify-mirror
==============================================================================
--- branches/2.0-releng/utils/verify-mirror	(original)
+++ branches/2.0-releng/utils/verify-mirror	Tue Jul 17 10:49:47 2007
@@ -44,7 +44,7 @@
 
         for my $remotepath ( sort keys %$paths ) {
             $pool->clear;
-	    my $localpath = abs2rel($remotepath, $m->source_path => $path, '/');
+	    my $localpath = abs2rel($remotepath, ($m->source_path || '/') => $path, '/');
             my $local     = delete $changed->{$localpath}
                 or die "$localpath is not in changes";
             my $action = $SVK::Command::Log::chg->[ $local->change_kind ];