/[smeserver]/builds_bin/update_repos
ViewVC logotype

Diff of /builds_bin/update_repos

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

Revision 1.22 by slords, Mon Nov 5 03:10:02 2007 UTC Revision 1.23 by slords, Mon Nov 5 14:51:28 2007 UTC
# Line 128  foreach my $smever ( sort { $a <=> $b } Line 128  foreach my $smever ( sort { $a <=> $b }
128          $archs = ();          $archs = ();
129    
130          foreach my $pkg ( @pkgs ) {          foreach my $pkg ( @pkgs ) {
131              next if $pkg->{done} || $pkg->{obsolete} || $pkg->{rpm}->is_source_package || ! $repos->{$pkg->{repo}} || rprop($pkg, 'stage');              next if $pkg->{done} || $pkg->{obsolete} || $pkg->{rpm}->is_source_package || ! $repos->{$pkg->{repo}};
132              printline('bold black', 1, ' - ', $pkg->{rpm}->filename) if $opts{d};              printline('bold black', 1, ' - ', $pkg->{rpm}->filename) if $opts{d};
133              my $orig = 0;              my $orig = 0;
134    
135              # Find names of packages in same or higher repos              # Find names of packages in same or higher repos
136              my %names = names($pkg, @pkgs);              my %names = names($pkg, @pkgs);
137    
138                # Stage packages should never be most current
139                if ( rprop($pkg, 'stage') ) {
140                    tagpkg($pkg, 'obsolete');
141                    next;
142                }
143    
144              # Move packages from base/builds to correct area              # Move packages from base/builds to correct area
145              if ( rprop($pkg, 'base') || rprop($pkg, 'builds') ) {              elsif ( rprop($pkg, 'base') || rprop($pkg, 'builds') ) {
146                  printline('dark blue', 1, '    - checking base/builds') if $opts{d};                  printline('dark blue', 1, '    - checking base/builds') if $opts{d};
147                  my $repo = $names{$pkg->{name}} && $names{$pkg->{name}} > 1 ? $devel2 : $devel1;                  my $repo = $names{$pkg->{name}} && $names{$pkg->{name}} > 1 ? $devel2 : $devel1;
148                  if ( $pkg->{nonbase} ) {                  if ( $pkg->{nonbase} ) {

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
admin@koozali.org
 ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed