diff options
| author | Francois Pons <fpons@mandriva.com> | 2003-07-16 12:07:46 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2003-07-16 12:07:46 +0000 |
| commit | 9dfc4a84bccd82c292277217ec1b6fe59e6b5490 (patch) | |
| tree | 17b6a9d7bf42a7cc5e150e99f4c548f5f3338206 | |
| parent | ccf387bc861528d92e96017ea0263a59f6e94026 (diff) | |
| download | perl-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.pm | 2 |
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($_)) { |