Subversion Repositories DevTools

Rev

Rev 2026 | Rev 5709 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2026 Rev 2764
Line 211... Line 211...
211
        Verbose2("Already processed: $name");
211
        Verbose2("Already processed: $name");
212
        return;
212
        return;
213
    }
213
    }
214
    Verbose ("Processing: $name, $baseurl");
214
    Verbose ("Processing: $name, $baseurl");
215
 
215
 
216
#Debug0('Path:', $entry->{path});
216
Debug0('Path:', $entry->{path});
217
 
217
 
218
    #
218
    #
219
    #   Backtrack from entry
219
    #   Backtrack from entry
220
    #
220
    #
221
    if ( $entry->{path} =~ m~/?(.*)/((tags|branches|trunk)(/|$|@)(.*))$~ )
221
    if ( $entry->{path} =~ m~/?(.*)/((tags|branches|trunk)(/|$|@)(.*))$~ )
Line 261... Line 261...
261
                    my $svnSession = NewSessionByUrl ( $baseurl, 1 );
261
                    my $svnSession = NewSessionByUrl ( $baseurl, 1 );
262
 
262
 
263
            #Debug0('base:', $baseurl, $tgt );
263
            #Debug0('base:', $baseurl, $tgt );
264
                    my $data;
264
                    my $data;
265
                    $bt = $svnSession->backTrackSvnLabel($tgt, 'data' => \$data);
265
                    $bt = $svnSession->backTrackSvnLabel($tgt, 'data' => \$data);
-
 
266
 
-
 
267
Error ("The return value from backTrackSvnLabel has changed since the code was written",
-
 
268
       "The result is now a path relative to the base of the Repo",
-
 
269
       "Result: $bt");
-
 
270
 
-
 
271
 
266
#            Debug0( 'Back:' , $bt );
272
#            Debug0( 'Back:' , $bt );
267
#            DebugDumpData('$data', $data );
273
#            DebugDumpData('$data', $data );
268
 
274
 
269
                    if ( ! exists $data->{isaBranch}  ) {
275
                    if ( ! exists $data->{isaBranch}  ) {
270
                        Warning ("Cannot backtrack: $name");
276
                        Warning ("Cannot backtrack: $name");