From 20b7df2511b967a33448c3ff95c8e69cb27e7921 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Wed, 26 Oct 2005 12:44:00 +0000 Subject: Expand .urpmi arguments to gurpmi --- gurpmi.pm | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/gurpmi.pm b/gurpmi.pm index 1f58ba2f..4b972410 100644 --- a/gurpmi.pm +++ b/gurpmi.pm @@ -39,7 +39,18 @@ sub fatal { my $s = $_[0]; print STDERR "$s\n"; exit 1 } sub parse_command_line { my @all_rpms; our %options; - foreach (@ARGV) { + # Expand *.urpmi arguments + my @ARGV_expanded; + foreach my $a (@ARGV) { + if ($a =~ /\.urpmi$/) { + open my $fh, '<', $a or do { warn "Can't open $a: $!\n"; next }; + push @ARGV_expanded, map { chomp; $_ } <$fh>; + close $fh; + } else { + push @ARGV_expanded, $a; + } + } + foreach (@ARGV_expanded) { if (/^-/) { $_ eq '--no-verify-rpm' and $options{'no-verify-rpm'} = 1; /^--?[hv?]/ and usage(); -- cgit v1.2.1