diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:11 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:11 +0000 |
commit | f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee (patch) | |
tree | 1b0f8f27140677b1cdbdba46515dbd258de3edaa /clean-rpmsrate | |
parent | 7e8260c9d15620dbd84d7991cef8448db54dbb55 (diff) | |
download | mgatools-f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee.tar mgatools-f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee.tar.gz mgatools-f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee.tar.bz2 mgatools-f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee.tar.xz mgatools-f6e4d6e99e41fb0e41753f61fa2453f2f6c459ee.zip |
rename $rpmsrate as $output_file to show its real purpose
Diffstat (limited to 'clean-rpmsrate')
-rwxr-xr-x | clean-rpmsrate | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/clean-rpmsrate b/clean-rpmsrate index f9b7777..0ec4c3b 100755 --- a/clean-rpmsrate +++ b/clean-rpmsrate @@ -5,8 +5,8 @@ use strict; use MGATools::rpmsrate qw(cleanrpmsrate); -my $rpmsrate; -$ARGV[0] =~ /-o/ and shift @ARGV and $rpmsrate = shift; +my $output_file; +$ARGV[0] =~ /-o/ and shift @ARGV and $output_file = shift; $ARGV[1] or print "\nUsage: clean-rpmsrate [options] <rpmsrate file> <RPMs dir 1> <RPMs dir 2> ... <RPMs dir n> @@ -19,4 +19,4 @@ my $rpmsrate_base = shift @ARGV; foreach my $d (@ARGV) { $rpm{$d} = [ map { s!$d/?(.*)\.rpm$!$1!; $_ } glob "$d/*.rpm" ]; } -cleanrpmsrate($rpmsrate_base, $rpmsrate, 0, \%rpm); +cleanrpmsrate($rpmsrate_base, $output_file, 0, \%rpm); |