commit perl-Encode-JIS2K for openSUSE:Factory

[root]

Hello community,

here is the log from the commit of package perl-Encode-JIS2K for 
openSUSE:Factory checked in at 2017-07-30 11:24:38
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Encode-JIS2K (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Encode-JIS2K.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Encode-JIS2K"

Sun Jul 30 11:24:38 2017 rev:22 rq:510961 version:0.02

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Encode-JIS2K/perl-Encode-JIS2K.changes      
2014-11-13 09:19:33.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Encode-JIS2K.new/perl-Encode-JIS2K.changes 
2017-07-30 11:24:41.228193922 +0200
@@ -1,0 +2,5 @@
+Mon Jul  3 10:58:01 UTC 2017 - bwiedem...@suse.com
+
+- Add reproducible.patch to sort hash keys to fix build-compare
+
+-------------------------------------------------------------------

New:
----
  reproducible.patch

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Encode-JIS2K.spec ++++++
--- /var/tmp/diff_new_pack.HqN3VP/_old  2017-07-30 11:24:42.607999221 +0200
+++ /var/tmp/diff_new_pack.HqN3VP/_new  2017-07-30 11:24:42.611998656 +0200
@@ -23,6 +23,8 @@
 Url:            http://search.cpan.org/~dankogai/Encode-JIS2K-0.02/
 Source0:        
http://search.cpan.org/CPAN/authors/id/D/DA/DANKOGAI/Encode-JIS2K-0.02.tar.gz
 Patch0:         perl-Encode-JIS2K.patch
+# PATCH-FIX-UPSTREAM in 0.03
+Patch1:         reproducible.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 Summary:        JIS X 0212 (aka JIS 2000) Encodings
 License:        Artistic-1.0
@@ -47,6 +49,7 @@
 %prep
 %setup -q -n Encode-JIS2K-%{version}
 %patch0 -p1
+%patch1 -p1
 
 %build
 CFLAGS="$RPM_OPT_FLAGS" perl Makefile.PL

++++++ reproducible.patch ++++++
Sort hash keys list

because we want reproducible output
even though hash order is undeterministic

See https://reproducible-builds.org/ for why this is good.
Index: Encode-JIS2K-0.02/Makefile.PL
===================================================================
--- Encode-JIS2K-0.02.orig/Makefile.PL
+++ Encode-JIS2K-0.02/Makefile.PL
@@ -73,7 +73,7 @@ sub post_initialize
     $self->{'C'} = ["$name.c"];
     # $self->{'H'} = [$self->catfile($self->updir,'encode.h')];
     my %xs;
-    foreach my $table (keys %tables) {
+    foreach my $table (sort keys %tables) {
        push (@{$self->{'C'}},"$table.c");
        # Do NOT add $table.h etc. to H_FILES unless we own up as to how they
        # get built.
@@ -91,7 +91,7 @@ sub post_initialize
 #define U8 U8
 #include "encode.h"
 END
-    foreach my $table (keys %tables) {
+    foreach my $table (sort keys %tables) {
        print XS qq[#include "${table}.h"\n];
     }
     print XS <<"END";
@@ -120,7 +120,7 @@ PROTOTYPES: DISABLE
 BOOT:
 {
 END
-    foreach my $table (keys %tables) {
+    foreach my $table (sort keys %tables) {
        print XS qq[#include "${table}.exh"\n];
     }
     print XS "}\n";
@@ -134,14 +134,14 @@ sub postamble
     my $dir  = "."; # $self->catdir('Encode');
     my $str  = "# $name\$(OBJ_EXT) depends on .h and .exh files not .c files - 
but all written by enc2xs\n";
     $str    .= "$name.c : $name.xs ";
-    foreach my $table (keys %tables)
+    foreach my $table (sort keys %tables)
     {
        $str .= " $table.c";
     }
     $str .= "\n\n";
     $str .= "$name\$(OBJ_EXT) : $name.c\n\n";
 
-    foreach my $table (keys %tables)
+    foreach my $table (sort keys %tables)
     {
        my $numlines = 1;
        my $lengthsofar = length($str);