/[soft]/mgatools/trunk/clean-rpmsrate
ViewVC logotype

Diff of /mgatools/trunk/clean-rpmsrate

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

revision 3485 by tv, Thu Mar 15 12:17:11 2012 UTC revision 3512 by tv, Thu Mar 15 19:12:27 2012 UTC
# Line 19  my $rpmsrate_base = shift @ARGV; Line 19  my $rpmsrate_base = shift @ARGV;
19  foreach my $d (@ARGV) {  foreach my $d (@ARGV) {
20      $rpm{$d} = [ map { s!$d/?(.*)\.rpm$!$1!; $_ } glob "$d/*.rpm" ];      $rpm{$d} = [ map { s!$d/?(.*)\.rpm$!$1!; $_ } glob "$d/*.rpm" ];
21  }  }
22  cleanrpmsrate($rpmsrate_base, $output_file, 0, \%rpm);  cleanrpmsrate($rpmsrate_base, $output_file, \%rpm);
Legend:
Removed from v.3485  
changed lines
  Added in v.3512
  ViewVC Help
Powered by ViewVC 1.1.30