<?xml version="1.0" encoding="UTF-8" ?>

<bugzilla version="5.2"
          urlbase="https://bugzilla.altlinux.org/"
          
          maintainer="jenya@basealt.ru"
>

    <bug>
          <bug_id>25169</bug_id>
          
          <creation_ts>2011-02-28 17:21:23 +0300</creation_ts>
          <short_desc>Name &quot;RPM::num2tag&quot; used only once: possible typo</short_desc>
          <delta_ts>2011-03-10 16:08:42 +0300</delta_ts>
          <reporter_accessible>1</reporter_accessible>
          <cclist_accessible>1</cclist_accessible>
          <classification_id>4</classification_id>
          <classification>Development</classification>
          <product>Sisyphus</product>
          <component>perl-RPM</component>
          <version>unstable</version>
          <rep_platform>all</rep_platform>
          <op_sys>Linux</op_sys>
          <bug_status>CLOSED</bug_status>
          <resolution>FIXED</resolution>
          
          
          <bug_file_loc></bug_file_loc>
          <status_whiteboard></status_whiteboard>
          <keywords></keywords>
          <priority>P3</priority>
          <bug_severity>normal</bug_severity>
          <target_milestone>---</target_milestone>
          
          
          <everconfirmed>1</everconfirmed>
          <reporter name="viy">viy</reporter>
          <assigned_to name="Nobody&apos;s working on this, feel free to take it">nobody</assigned_to>
          
          
          <qa_contact>qa-sisyphus</qa_contact>

      

      

      

          <comment_sort_order>oldest_to_newest</comment_sort_order>  
          <long_desc isprivate="0" >
    <commentid>118913</commentid>
    <comment_count>0</comment_count>
      <attachid>4825</attachid>
    <who name="viy">viy</who>
    <bug_when>2011-02-28 17:21:23 +0300</bug_when>
    <thetext>Created attachment 4825
зкщзщыув зфеср

В Сизифе при использовании RPM::Header с use warnings, ругань
Name &quot;RPM::num2tag&quot; used only once: possible typo at /usr/lib64/perl5/DynaLoader.pm line 223.
Name &quot;RPM::tag2num&quot; 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, &apos;vercmp&apos;, &apos;evrcmp&apos;);
 
+use vars qw($tag2num $num2tag);
+
 bootstrap RPM;
 
 # These are stubs into the sub-module bootstraps, hacked into RPM.xs</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>118945</commentid>
    <comment_count>1</comment_count>
    <who name="viy">viy</who>
    <bug_when>2011-03-01 18:38:13 +0300</bug_when>
    <thetext>патч локально протестирован и проблем не создает, могу выложить в Сизиф.</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>119156</commentid>
    <comment_count>2</comment_count>
    <who name="viy">viy</who>
    <bug_when>2011-03-10 16:08:42 +0300</bug_when>
    <thetext>выложил perl-RPM-1.49-alt1.2 в Сизиф.</thetext>
  </long_desc>
      
          <attachment
              isobsolete="0"
              ispatch="1"
              isprivate="0"
          >
            <attachid>4825</attachid>
            <date>2011-02-28 17:21:23 +0300</date>
            <delta_ts>2011-02-28 17:21:23 +0300</delta_ts>
            <desc>зкщзщыув зфеср</desc>
            <filename>perl-RPM-1.49-fix-warning-use-once.patch</filename>
            <type>text/plain</type>
            <size>332</size>
            <attacher name="viy">viy</attacher>
            
              <data encoding="base64">LS0tIFBlcmwtUlBNL1JQTS5wbQkyMDA3LTA0LTIyIDExOjAxOjA5ICswMzAwCisrKyBQZXJsLVJQ
TS9SUE0ucG0JMjAxMS0wMi0yOCAxNTo0NDoyOSArMDIwMApAQCAtMTQsNiArMTQsOCBAQAogQEVY
UE9SVCA9IHF3KHJwbV9vc25hbWUgcnBtX2FyY2huYW1lIHJwbV92ZXJzaW9uKTsKIEBFWFBPUlRf
T0sgPSAoQEVYUE9SVCwgJ3ZlcmNtcCcsICdldnJjbXAnKTsKIAordXNlIHZhcnMgcXcoJHRhZzJu
dW0gJG51bTJ0YWcpOworCiBib290c3RyYXAgUlBNOwogCiAjIFRoZXNlIGFyZSBzdHVicyBpbnRv
IHRoZSBzdWItbW9kdWxlIGJvb3RzdHJhcHMsIGhhY2tlZCBpbnRvIFJQTS54cwo=
</data>

          </attachment>
      

    </bug>

</bugzilla>