Bug 25169 - Name "RPM::num2tag" used only once: possible typo
Summary: Name "RPM::num2tag" used only once: possible typo
Status: CLOSED FIXED
Alias: None
Product: Sisyphus
Classification: Development
Component: perl-RPM (show other bugs)
Version: unstable
Hardware: all Linux
: P3 normal
Assignee: at@altlinux.org
QA Contact: qa-sisyphus
URL:
Keywords:
Depends on:
Blocks:
 
Reported: 2011-02-28 17:21 MSK by viy
Modified: 2011-03-10 16:08 MSK (History)
10 users (show)

See Also:

Attachments
зкщзщыув зфеср (332 bytes, patch)
2011-02-28 17:21 MSK, viy 		no flags Details | Diff
View All Add an attachment (proposed patch, testcase, etc.)

Note You need to log in before you can comment on or make changes to this bug.
Description viy 2011-02-28 17:21:23 MSK 
Created attachment 4825 [details]
зкщзщыув зфеср

В Сизифе при использовании RPM::Header с use warnings, ругань
Name "RPM::num2tag" used only once: possible typo at /usr/lib64/perl5/DynaLoader.pm line 223.
Name "RPM::tag2num" used only once: possible typo at /usr/lib64/perl5/DynaLoader.pm line 223.
надо их явно обьявить вне XS кода, как в патче внизу.
--- Perl-RPM/RPM.pm	2007-04-22 11:01:09 +0300
+++ Perl-RPM/RPM.pm	2011-02-28 15:44:29 +0200
@@ -14,6 +14,8 @@
 @EXPORT = qw(rpm_osname rpm_archname rpm_version);
 @EXPORT_OK = (@EXPORT, 'vercmp', 'evrcmp');
 
+use vars qw($tag2num $num2tag);
+
 bootstrap RPM;
 
 # These are stubs into the sub-module bootstraps, hacked into RPM.xs
Comment 1 viy 2011-03-01 18:38:13 MSK 
патч локально протестирован и проблем не создает, могу выложить в Сизиф.
Comment 2 viy 2011-03-10 16:08:42 MSK 
выложил perl-RPM-1.49-alt1.2 в Сизиф.