diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-15 19:12:57 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-15 19:12:57 +0000 |
| commit | aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f (patch) | |
| tree | 29cccb35adbfb86290e110fc6ede7b32e7d4a66e | |
| parent | 8241f3a04f646594df413913c4cc12e0ade1328c (diff) | |
| download | mgatools-aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f.tar mgatools-aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f.tar.gz mgatools-aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f.tar.bz2 mgatools-aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f.tar.xz mgatools-aa3e72b2a1d37d6fbbb0b0864cd6f2c61ad6b64f.zip | |
reorder for clarity
| -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" ]; } |