[libterm-readkey-perl] 01/04: Make genchars.pl output reproducible by sorting hash keys

[Niko Tyni]

This is an automated email from the git hooks/post-receive script.

ntyni pushed a commit to branch master
in repository libterm-readkey-perl.

commit 75652147c80339f8a8bd64284d2c6f66720d2067
Author: Niko Tyni <ntyni at debian.org>
Date:   Mon Jun 1 18:44:39 2015 +0300

    Make genchars.pl output reproducible by sorting hash keys
---
 ...rs.pl-output-reproducible-by-sorting-hash.patch | 29 ++++++++++++++++++++++
 debian/patches/series                              |  1 +
 2 files changed, 30 insertions(+)

diff --git a/debian/patches/0001-Make-genchars.pl-output-reproducible-by-sorting-hash.patch b/debian/patches/0001-Make-genchars.pl-output-reproducible-by-sorting-hash.patch
new file mode 100644
index 0000000..f32ee53
--- /dev/null
+++ b/debian/patches/0001-Make-genchars.pl-output-reproducible-by-sorting-hash.patch
@@ -0,0 +1,29 @@
+From f54fd02346e2bba8cd14f3809aac5041f71a1eaa Mon Sep 17 00:00:00 2001
+From: Niko Tyni <ntyni at debian.org>
+Date: Mon, 1 Jun 2015 18:44:39 +0300
+Subject: [PATCH] Make genchars.pl output reproducible by sorting hash keys
+
+---
+ genchars.pl | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+--- libterm-readkey-perl.orig/genchars.pl
++++ libterm-readkey-perl/genchars.pl
+@@ -98,7 +98,7 @@
+ 
+ print "\n";
+ if(1) {
+-	@values = sort { $possible{$a} cmp $possible{$b} } keys %possible;
++	@values = sort { $possible{$a} cmp $possible{$b} or $a cmp $b } keys %possible;
+ 
+ 	print "Writing termio/termios section of cchars.h... ";
+ 	print CCHARS "
+@@ -303,7 +303,7 @@
+ 	print "Checking symbols\n";
+ 
+ 
+-	for $c (keys %possible2) {
++	for $c (sort keys %possible2) {
+ 
+ #		if($tchars and !report("
+ ##include <sgtty.h>
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..5c1a605
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+0001-Make-genchars.pl-output-reproducible-by-sorting-hash.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libterm-readkey-perl.git