Subversion Repositories DevTools

Rev

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

Rev 369 Rev 371
Line 385... Line 385...
385 
# Returns         : As above
 385 
# Returns         : As above
386 
#
 386 
#
387 
sub getBase
 387 
sub getBase
388 
{
 388 
{
389 
    my ($self, $type ) = @_;
 389 
    my ($self, $type ) = @_;
- 
 
 390 
 
390 
    if ( $type == 1 ) {
 391 
    if ( $type == 1 ) {
391 
        return $self->{ROOT};
 392 
        return $self->{ROOT};
392 
    } elsif ( $type == 2 ) {
 393 
    } elsif ( $type == 2 ) {
393 
        if ( $self->{'TYPE'} eq 'build' ) {
 394 
        if ( $self->{'TYPE'} eq 'build' ) {
394 
            return $interface;
 395 
            return $interface;
395 
        } else {
 396 
        } else {
396 
            return $self->{ROOT};
 397 
            return $self->{ROOT};
397 
        }
 398 
        }
398 
    } elsif ( $type == 3 ) {
 399 
    } elsif ( $type == 3 ) {
399 
        return if ( $self->{'TYPE'} eq 'build' );
 400 
        return if ( $self->{'TYPE'} eq 'build' );
400 
        return return $self->{ROOT};
 401 
        return $self->{ROOT};
401 
    } else  {
 402 
    } else  {
402 
        return '';
 403 
        return '';
403 
    }
 404 
    }
404 
}
 405 
}
405 
 
 406