Subversion Repositories DevTools

Rev

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

Rev 2312 Rev 2319
Line 127... Line 127...
127 
    '.oslo'         => '.oso',
 127 
    '.oslo'         => '.oso',
128 
    '.osl'          => '.oso',
 128 
    '.osl'          => '.oso',
129 
);
 129 
);
130 
 
 130 
 
131 
my %specialPackages = (
 131 
my %specialPackages = (
132 
    'core_devl' =>  ',all,protected,',
 132 
    'core_devl'           =>  ',all,protected,',
- 
 
 133 
    'daf_utils_mos'       => ',flat,',
133 
#    'core_devl' =>  ',all,',
 134 
    'mos_packager'        => ',all,',
134 
    'daf_utils_mos' => ',flat,',
 135 
    'cfmgr-cfmgr'         => ',flat,',
135 
    'mos_packager'  => ',all,',
 136 
    'daf_utils_button_st' => ',flat,',
136 
 
 137 
 
137 
    # Need to be handled in a special manner
 138 
    # Need to be handled in a special manner
138 
    # Not done by this utility
 139 
    # Not done by this utility
139 
    #
 140 
    #
140 
    'linux_drivers_eb5600'  => ',protected,',
 141 
    'linux_drivers_eb5600'  => ',protected,',
Line 1562... Line 1563...
1562 
    #   Delete the created view
 1563 
    #   Delete the created view
1563 
    #   Its just a directory, so delete it
 1564 
    #   Its just a directory, so delete it
1564 
    #
 1565 
    #
1565 
    if ( $data{ViewRoot} && -d $data{ViewRoot})
 1566 
    if ( $data{ViewRoot} && -d $data{ViewRoot})
1566 
    {
 1567 
    {
1567 
        if ( !$opt_reuse || $rv )
 1568 
        if ( !$opt_reuse || ($rv && $rv != 4) )
1568 
        {
 1569 
        {
1569 
            Message ("Delete View: $data{ViewRoot}");
 1570 
            Message ("Delete View: $data{ViewRoot}");
1570 
            RmDirTree ($data{ViewRoot} );
 1571 
            RmDirTree ($data{ViewRoot} );
1571 
        }
 1572 
        }
1572 
        else
 1573 
        else
Line 1731... Line 1732...
1731 
    {
 1732 
    {
1732 
        unless ( $opt_ignoreProjectBaseErrors )
 1733 
        unless ( $opt_ignoreProjectBaseErrors )
1733 
        {
 1734 
        {
1734 
            $data->{BadProjectBase}++;
 1735 
            $data->{BadProjectBase}++;
1735 
            $data->{errStr} = 'Bad usage of ProjectBase detected';
 1736 
            $data->{errStr} = 'Bad usage of ProjectBase detected';
- 
 
 1737 
            return 4;           # Lets see what the others look like too
1736 
            return 14;
 1738 
#            return 14;
1737 
        }
 1739 
        }
1738 
    }
 1740 
    }
1739 
 
 1741 
 
1740 
 
 1742 
 
1741 
    #
 1743 
    #
Line 2911... Line 2913...
2911 
    my ($tag) = @_;
 2913 
    my ($tag) = @_;
2912 
    $tag =~ tr~\\/~/~;
 2914 
    $tag =~ tr~\\/~/~;
2913 
    if ( $tag =~ m~^CC::~ )
 2915 
    if ( $tag =~ m~^CC::~ )
2914 
    {
 2916 
    {
2915 
        $tag =~ s~CC::\s+~CC::~;
 2917 
        $tag =~ s~CC::\s+~CC::~;
- 
 
 2918 
        $tag =~ s~/build.pl::~::~i;
- 
 
 2919 
        $tag =~ s~/src::~::~i;
2916 
        $tag =~ s~MASS_Dev_Bus/Cbp/~MASS_Dev_Bus/CBP/~i;
 2920 
        $tag =~ s~MASS_Dev_Bus/Cbp/~MASS_Dev_Bus/CBP/~i;
2917 
        $tag =~ s~MASS_Dev_Bus~MASS_Dev_Bus~i;
 2921 
        $tag =~ s~MASS_Dev_Bus~MASS_Dev_Bus~i;
2918 
        $tag =~ s~/MASS_Dev/Infra~MASS_Dev_Infra~i;
 2922 
        $tag =~ s~/MASS_Dev/Infra~MASS_Dev_Infra~i;
2919 
        $tag =~ s~/MASS_Dev/Bus/web~/MASS_Dev_Bus/web~i;
 2923 
        $tag =~ s~/MASS_Dev/Bus/web~/MASS_Dev_Bus/web~i;
2920 
 
 2924