summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-12-05 20:28:02 +0000
committerFrancois Pons <fpons@mandriva.com>2003-12-05 20:28:02 +0000
commitff5de4e539ee979095de9f48d335a6ede0ae4584 (patch)
treeb5c49b7751a3be003e06216837052b5f17219e95
parent5d034413d1804079456b89690c3dd9ef55b81b58 (diff)
downloadurpmi-ff5de4e539ee979095de9f48d335a6ede0ae4584.tar
urpmi-ff5de4e539ee979095de9f48d335a6ede0ae4584.tar.gz
urpmi-ff5de4e539ee979095de9f48d335a6ede0ae4584.tar.bz2
urpmi-ff5de4e539ee979095de9f48d335a6ede0ae4584.tar.xz
urpmi-ff5de4e539ee979095de9f48d335a6ede0ae4584.zip
fixed small options being blocking long options.
-rwxr-xr-xurpmi.addmedia8
-rwxr-xr-xurpmi.update14
2 files changed, 11 insertions, 11 deletions
diff --git a/urpmi.addmedia b/urpmi.addmedia
index a4c9528e..09e02504 100755
--- a/urpmi.addmedia
+++ b/urpmi.addmedia
@@ -83,10 +83,10 @@ and [options] are from
$options{probe_with} = 'synthesis'; #- no the default is to probe synthesis file.
my $urpm = new urpm;
while ($_ = shift @_) {
- /^--?c/ and $options{noclean} = 0, next;
- /^--?h/ and next;
- /^--?f/ and ++$options{force}, next;
- /^-z$/ and ++$options{compress}, next;
+ /^--?c$/ and $options{noclean} = 0, next;
+ /^--?h$/ and next;
+ /^--?f$/ and ++$options{force}, next;
+ /^--?z$/ and ++$options{compress}, next;
/^--wget/ and $urpm->{sync} = sub { my $options = shift @_;
if (ref $options) { $options->{prefer} = 'wget' }
else { $options = { dir => $options, prefer => 'wget' } }
diff --git a/urpmi.update b/urpmi.update
index d8d5f95d..41dd0101 100755
--- a/urpmi.update
+++ b/urpmi.update
@@ -28,10 +28,10 @@ sub main {
$options{force} = 0;
$options{noclean} = 1;
while ($_ = shift @_) {
- /^--?a/ and $options{all} = 1, next;
- /^--?c/ and $options{noclean} = 0, next;
- /^--?f/ and ++$options{force}, next;
- /^-z$/ and ++$options{compress}, next;
+ /^--?a$/ and $options{all} = 1, next;
+ /^--?c$/ and $options{noclean} = 0, next;
+ /^--?f$/ and ++$options{force}, next;
+ /^--?z$/ and ++$options{compress}, next;
/^--update$/ and $options{update} = 1, next;
/^--wget$/ and $urpm->{sync} = sub { my $options = shift @_;
if (ref $options) { $options->{prefer} = 'wget' }
@@ -53,9 +53,9 @@ sub main {
$urpm->{proxy}{pwd} = $2;
next;
};
- /^--no-md5sum/ and $options{nomd5sum} = 1, next;
- /^--?noa/ and next; #- default, keeped for compability.
- /^--?d/ and next; #- default, keeped for compability.
+ /^--no-md5sum$/ and $options{nomd5sum} = 1, next;
+ /^--?noa$/ and next; #- default, keeped for compability.
+ /^--?d$/ and next; #- default, keeped for compability.
/^-/ and die N("usage: urpmi.update [options] <name> ...
where <name> is a medium name to update.
") . N(" --help - print this help message.