Subversion Repositories DevTools

Rev

Rev 3043 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3043 Rev 3345
Line 2174... Line 2174...
2174
 
2174
 
2175
            if ( $workSpace->{path}{'kind'} eq 'dir' &&  exists $workSpace->{path}{'copyfrom-path'} )
2175
            if ( $workSpace->{path}{'kind'} eq 'dir' &&  exists $workSpace->{path}{'copyfrom-path'} )
2176
            {
2176
            {
2177
                my $srev = $workSpace->{path}{'copyfrom-rev'};
2177
                my $srev = $workSpace->{path}{'copyfrom-rev'};
2178
                my $from = $workSpace->{path}{'copyfrom-path'};
2178
                my $from = $workSpace->{path}{'copyfrom-path'};
2179
                if ( $from =~ m~/trunk$~ || $from =~ m~/branches/[^/]+$~ )
2179
                if ( $from =~ m~/trunk$~ || $from =~ m~/branches/[^/]+~ )
2180
                {
2180
                {
2181
                    $workSpace->{devBranch} = $from . '@' . $srev;
2181
                    $workSpace->{devBranch} = $from . '@' . $srev;
2182
                }
2182
                }
2183
            }
2183
            }
2184
 
2184