Lines Matching refs:vers
55 my $vers = pop(@parts);
56 (join('-', @parts), $vers)
60 my($pl, $vers, $url, $date) = @_;
62 OpenSourceVersion => $vers,
91 my($dist, $found, $foundvers, $name, $vers, %projectsCurrent, %projectsPrevious);
98 ($name, $vers) = nameVers($_);
100 die "***Multiple entries for $name $v and $vers (possibly others)\n" if defined($v) && $v ne $vers;
101 $projectsCurrent{$name} = $vers;
135 ($name, $vers) = nameVers($dist->base_id);
137 unless($vers gt $foundvers) {
138 print " Previous $name-$foundvers preferred over $name-$vers\n";
141 print " Preferring $name-$vers over previous $name-$foundvers\n";
143 print " Found $name-$vers\n";
146 $foundvers = $vers;
150 ($name, $vers) = nameVers($dist->base_id);
153 unless($vers gt $foundvers) {
154 print " Previous $name-$foundvers preferred over $name-$vers\n";
157 print " Preferring $name-$vers over previous $name-$foundvers\n";
159 print " Found $name-$vers\n";
162 $foundvers = $vers;
175 ($name, $vers) = nameVers($new);
180 if($vers eq $oldvers) {
181 print " Already have $name-$vers\n";
230 push(@args, '-e', "s/$svers/$vers/");
237 updatePlist('oss.partial', $vers, $url, $importDate);