Subversion Repositories DevTools

Rev

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

Rev 1451 Rev 1453
Line 142... Line 142...
142 
    'linux_drivers_cobra'   => ',protected,',
 142 
    'linux_drivers_cobra'   => ',protected,',
143 
    'linux_drivers_bcp4600' => ',protected,',
 143 
    'linux_drivers_bcp4600' => ',protected,',
144 
    'linux_drivers_etx86'   => ',protected,',
 144 
    'linux_drivers_etx86'   => ',protected,',
145 
    'linux_drivers_tp5600'  => ',protected,',
 145 
    'linux_drivers_tp5600'  => ',protected,',
146 
 
 146 
 
- 
 
 147 
    'cs'                    => ',protected,',
- 
 
 148 
 
147 
    'ftp'                   => 'SetProjectBase,',
 149 
    'ftp'                   => 'SetProjectBase,',
148 
 
 150 
 
149 
    'icl'                   => 'IgnoreProjectBase,',
 151 
    'icl'                   => 'IgnoreProjectBase,',
150 
    'itso'                  => 'IgnoreProjectBase,',
 152 
    'itso'                  => 'IgnoreProjectBase,',
151 
    'daf_osa_mos'           => 'IgnoreProjectBase,',
 153 
    'daf_osa_mos'           => 'IgnoreProjectBase,',
Line 163... Line 165...
163 
);
 165 
);
164 
 
 166 
 
165 
my $ukHopsMode = 0;
 167 
my $ukHopsMode = 0;
166 
my %ukHopsReleases = (
 168 
my %ukHopsReleases = (
167 
    '6222'      => { name => 'MainLine', 'trunk' => 1 },
 169 
    '6222'      => { name => 'MainLine', 'trunk' => 1 },
168 
    '17223'     => { name => 'Hops4' },
 - 
 
169 
    '21864'     => { name => 'Hops3.6' },
 - 
 
170 
    '14503'     => { name => 'Hops3' },
 170 
    '14503'     => { name => 'Hops3' },
- 
 
 171 
    '21864'     => { name => 'Hops3.6' },
- 
 
 172 
    '22303'     => { name => 'Hops3.7' },
- 
 
 173 
    '17223'     => { name => 'Hops4' },
171 
);
 174 
);
172 
 
 175 
 
173 
################################################################################
 176 
################################################################################
174 
#   Global data
 177 
#   Global data
175 
#
 178 
#
Line 914... Line 917...
914 
            my $entry = $_;
 917 
            my $entry = $_;
915 
            my $count = 0;
 918 
            my $count = 0;
916 
            while ( $entry )
 919 
            while ( $entry )
917 
            {
 920 
            {
918 
                last if ( $versions{$entry}{KeepMe} );
 921 
                last if ( $versions{$entry}{KeepMe} );
919 
                unless ( $versions{$entry}{isaRipple} )
 922 
#                unless ( $versions{$entry}{isaRipple} )
920 
                {
 923 
                {
921 
                    my $keepFlag = ($count++ < $opt_retaincount);
 924 
                    my $keepFlag = ($count++ < $opt_retaincount);
922 
                    last unless ( $keepFlag );
 925 
                    last unless ( $keepFlag );
923 
                    $versions{$entry}{KeepMe} = $keepFlag;
 926 
                    $versions{$entry}{KeepMe} = $keepFlag;
924 
                }
 927 
                }
Line 1671... Line 1674...
1671 
 
 1674 
 
1672 
    #
 1675 
    #
1673 
    #   Some really ugly packages make use of a Jats feature called 'SetProjectBase'
 1676 
    #   Some really ugly packages make use of a Jats feature called 'SetProjectBase'
1674 
    #   Detect such packages as we will need to handle them differently
 1677 
    #   Detect such packages as we will need to handle them differently
1675 
    #   Can't really handle it on the fly
 1678 
    #   Can't really handle it on the fly
1676 
    #   All we can do is detct it and report it - at the moment
 1679 
    #   All we can do is detect it and report it - at the moment
1677 
    #
 1680 
    #
1678 
    if (detectProjectBaseUsage($data, $cc_path) )
 1681 
    if (detectProjectBaseUsage($data, $cc_path) )
1679 
    {
 1682 
    {
1680 
        unless ( $opt_ignoreProjectBaseErrors )
 1683 
        unless ( $opt_ignoreProjectBaseErrors )
1681 
        {
 1684 
        {