diff options
author | Olivier Thauvin <nanardon@mandriva.org> | 2004-04-25 10:44:42 +0000 |
---|---|---|
committer | Olivier Thauvin <nanardon@mandriva.org> | 2004-04-25 10:44:42 +0000 |
commit | d381d7b78c47ea2cddb46b9e50782372a45a62d9 (patch) | |
tree | 9edb5c4d9d9903a715cd78856f6272df99202de7 /URPM/Query.pm | |
parent | 40144b2ef015bbfc652d96f0d03957af7078addb (diff) | |
download | perl-URPM-d381d7b78c47ea2cddb46b9e50782372a45a62d9.tar perl-URPM-d381d7b78c47ea2cddb46b9e50782372a45a62d9.tar.gz perl-URPM-d381d7b78c47ea2cddb46b9e50782372a45a62d9.tar.bz2 perl-URPM-d381d7b78c47ea2cddb46b9e50782372a45a62d9.tar.xz perl-URPM-d381d7b78c47ea2cddb46b9e50782372a45a62d9.zip |
- add $pkg->queryformat() function
- $ûrpm->list_rpm_tag show all tag, value for unparsable tag is 'undef' in hash
Diffstat (limited to 'URPM/Query.pm')
-rw-r--r-- | URPM/Query.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Query.pm b/URPM/Query.pm index c249470..8900355 100644 --- a/URPM/Query.pm +++ b/URPM/Query.pm @@ -14,7 +14,7 @@ use strict; sub tag2id { my @l = @_; my %taglist = URPM::list_rpm_tag; - map { $taglist{uc("RPMTAG_$_")} || undef } @l; + map { $taglist{uc($_)} || undef } @l; } sub query_pkg { |