aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-07-16 12:07:46 +0000
committerFrancois Pons <fpons@mandriva.com>2003-07-16 12:07:46 +0000
commit9dfc4a84bccd82c292277217ec1b6fe59e6b5490 (patch)
tree17b6a9d7bf42a7cc5e150e99f4c548f5f3338206
parentccf387bc861528d92e96017ea0263a59f6e94026 (diff)
downloadperl-URPM-9dfc4a84bccd82c292277217ec1b6fe59e6b5490.tar
perl-URPM-9dfc4a84bccd82c292277217ec1b6fe59e6b5490.tar.gz
perl-URPM-9dfc4a84bccd82c292277217ec1b6fe59e6b5490.tar.bz2
perl-URPM-9dfc4a84bccd82c292277217ec1b6fe59e6b5490.tar.xz
perl-URPM-9dfc4a84bccd82c292277217ec1b6fe59e6b5490.zip
fixed small typo on regex for URPM::compute_flags
-rw-r--r--URPM/Resolve.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index 0ba8ff1..9987dc5 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -845,7 +845,7 @@ sub compute_flags {
if (%regex) {
foreach my $pkg (@{$urpm->{depslist}}) {
#- check if fullname is matching a regexp.
- if (grep { exists($regex{$_}{''}) && $pkg->fullname =~ /$1/ } keys %regex) {
+ if (grep { exists($regex{$_}{''}) && $pkg->fullname =~ /$_/ } keys %regex) {
#- a single selection on fullname using a regular expression.
foreach (qw(skip disable_obsolete)) {
if ($options{$_} && !$pkg->flag($_)) {