gentoo-ebuilds/dev-perl/Net-Jabber/files/Net-Jabber-2.0-hash.patch
Andreas K. Hüttel 2435d96ebe
dev-perl/Net-Jabber: EAPI bump, fix bug 644034
Closes: https://bugs.gentoo.org/644034
Package-Manager: Portage-3.0.17, Repoman-3.0.2
Signed-off-by: Andreas K. Hüttel <dilfridge@gentoo.org>
2021-04-25 23:37:36 +02:00

19 lines
680 B
Diff

Description: feed hash to RPCEncode_Value() sorted
Origin: vendor
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=87436
Bug-Debian: https://bugs.debian.org/720271
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=87436
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-07-26
--- a/lib/Net/Jabber/Protocol.pm
+++ b/lib/Net/Jabber/Protocol.pm
@@ -2239,7 +2239,7 @@
elsif (ref($value) eq "HASH")
{
my $struct = $obj->AddValue()->AddStruct();
- foreach my $key (keys(%{$value}))
+ foreach my $key (sort keys(%{$value}))
{
$self->RPCEncode_Value($struct->AddMember(name=>$key),$value->{$key});
}