Subversion Repositories DevTools

Rev

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

Rev 1422 Rev 2025
Line 1479... Line 1479...
1479 
        $url = $1;
 1479 
        $url = $1;
1480 
        $self->{WSTYPE} = $3;
 1480 
        $self->{WSTYPE} = $3;
1481 
        if ( $3 eq 'trunk' ) {
 1481 
        if ( $3 eq 'trunk' ) {
1482 
            $devBranch = $3;
 1482 
            $devBranch = $3;
1483 
        } elsif ( $3 eq 'branches' ) {
 1483 
        } elsif ( $3 eq 'branches' ) {
- 
 
 1484 
            my @bits = split('/', $2);
1484 
            $devBranch = $2;
 1485 
            $devBranch = join('/', @bits[0 .. 1]);
1485 
        }
 1486 
        }
1486 
    }
 1487 
    }
1487 
    else
 1488 
    else
1488 
    {
 1489 
    {
1489 
        #
 1490 
        #