diff options
Diffstat (limited to 'clean-rpmsrate')
-rwxr-xr-x | clean-rpmsrate | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/clean-rpmsrate b/clean-rpmsrate index 8ab8f04..2e90985 100755 --- a/clean-rpmsrate +++ b/clean-rpmsrate @@ -14,8 +14,9 @@ $ARGV[1] or print "\nUsage: options: -o file: output file\n\n" and exit(); -my %rpm; my $rpmsrate_raw_file = shift @ARGV; + +my %rpm; foreach my $d (@ARGV) { $rpm{$d} = [ map { s!$d/?(.*)\.rpm$!$1!; $_ } glob "$d/*.rpm" ]; } |