diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-10-13 13:40:28 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-10-13 13:40:28 +0000 |
commit | 8082ff305e7973b52c816cea5d61923deccc1fa6 (patch) | |
tree | ed877f692c0a5d40b9e52edca20f02759cfb55c6 /urpm/args.pm | |
parent | a89707cf5ab7313c7495bc044ded20bee5d4514c (diff) | |
download | urpmi-8082ff305e7973b52c816cea5d61923deccc1fa6.tar urpmi-8082ff305e7973b52c816cea5d61923deccc1fa6.tar.gz urpmi-8082ff305e7973b52c816cea5d61923deccc1fa6.tar.bz2 urpmi-8082ff305e7973b52c816cea5d61923deccc1fa6.tar.xz urpmi-8082ff305e7973b52c816cea5d61923deccc1fa6.zip |
Allow ! ( ) as well as -! -( -) as arguments to urpmf (backwards compat)
Diffstat (limited to 'urpm/args.pm')
-rw-r--r-- | urpm/args.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/urpm/args.pm b/urpm/args.pm index 460adfbb..1e0978f3 100644 --- a/urpm/args.pm +++ b/urpm/args.pm @@ -167,7 +167,7 @@ my %options_spec = ( o => sub { $::expr .= ' || ' }, '<>' => sub { my $p = shift; - if ($p =~ /^-([!()])$/) { + if ($p =~ /^-?([!()])$/) { # This is for -! -( -) $::expr .= $1; } |