From ff5de4e539ee979095de9f48d335a6ede0ae4584 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 5 Dec 2003 20:28:02 +0000 Subject: fixed small options being blocking long options. --- urpmi.update | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'urpmi.update') 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] ... where is a medium name to update. ") . N(" --help - print this help message. -- cgit v1.2.1