Hello community,
here is the log from the commit of package perl-RPC-XML for openSUSE:Factory
checked in at 2013-07-01 15:59:24
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-RPC-XML (Old)
and /work/SRC/openSUSE:Factory/.perl-RPC-XML.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-RPC-XML"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-RPC-XML/perl-RPC-XML.changes
2013-05-06 10:11:08.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-RPC-XML.new/perl-RPC-XML.changes
2013-07-01 15:59:26.000000000 +0200
@@ -1,0 +2,6 @@
+Mon Jul 1 08:17:26 UTC 2013 - co...@suse.com
+
+- add RPC-XML-0.77-fixtest.dif to make sure the serialization is
+ reproducible even with hash randomization in perl 5.18 (RT#86187)
+
+-------------------------------------------------------------------
New:
----
RPC-XML-0.77-fixtest.dif
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-RPC-XML.spec ++++++
--- /var/tmp/diff_new_pack.wuUegO/_old 2013-07-01 15:59:26.000000000 +0200
+++ /var/tmp/diff_new_pack.wuUegO/_new 2013-07-01 15:59:26.000000000 +0200
@@ -28,6 +28,8 @@
#PATCH-FIX-OPENSUSE - r...@suse.de - fix build in chroot/buildservice
Patch1: RPC-XML-0.60-rev127.dif
Patch2: RPC-XML-0.76-extern_ent.dif
+#PATCH-FIX-UPSTREAM - co...@suse.de RT#86187
+Patch3: RPC-XML-0.77-fixtest.dif
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(File::Spec) >= 0.8
@@ -64,6 +66,7 @@
%setup -q -n %{cpan_name}-%{version}
%patch1 -p0
%patch2
+%patch3 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
++++++ RPC-XML-0.77-fixtest.dif ++++++
Index: RPC-XML-0.77/lib/RPC/XML.pm
===================================================================
--- RPC-XML-0.77.orig/lib/RPC/XML.pm
+++ RPC-XML-0.77/lib/RPC/XML.pm
@@ -842,7 +842,7 @@ sub as_string
("<member><name>$_</name><value>",
$clean{$_},
'</value></member>')
- } (keys %clean)),
+ } (sort keys %clean)),
'</struct>';
}
@@ -854,7 +854,7 @@ sub serialize
my $key;
print {$fh} '<struct>';
- for (keys %{$self})
+ for (sort keys %{$self})
{
($key = $_) =~ s/$RPC::XML::XMLRE/$RPC::XML::XMLMAP{$1}/ge;
utf8::downgrade($key);
--
To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org
For additional commands, e-mail: opensuse-commit+h...@opensuse.org
