Package: release.debian.org
Severity: normal
Tags: jessie
User: release.debian....@packages.debian.org
Usertags: pu
As per #826667 the last perl update unfortunately broke biber too
(at least it causes a test failure; the actual cause is a bit unclear,
but the fix is taken straight from the upstream perl 5.22 fixes).
Please find attached a proposed patch; let me know if it's okay to upload.
This was discovered by automated rebuild testing of all packages depending
on perl:
<http://perl.debian.net:3000/distribution#jessie>
this testing is not yet completed, but no other failures have been
found yet.
Thanks,
Dominic.
diff -Nru biber-1.9/debian/changelog biber-1.9/debian/changelog
--- biber-1.9/debian/changelog 2014-12-24 23:45:26.000000000 +0000
+++ biber-1.9/debian/changelog 2016-06-07 16:56:37.000000000 +0100
@@ -1,3 +1,10 @@
+biber (1.9-3+deb8u1) UNRELEASED; urgency=medium
+
+ * Non-maintainer upload.
+ * Fix breakage triggered by point release update of perl
+
+ -- Dominic Hargreaves <d...@earth.li> Tue, 07 Jun 2016 16:56:10 +0100
+
biber (1.9-3) unstable; urgency=medium
* cherry pick upstream fix for hyphenation fixes (Closes: #773872)
diff -Nru biber-1.9/debian/patches/fix-5.20.3 biber-1.9/debian/patches/fix-5.20.3
--- biber-1.9/debian/patches/fix-5.20.3 1970-01-01 01:00:00.000000000 +0100
+++ biber-1.9/debian/patches/fix-5.20.3 2016-06-07 16:55:50.000000000 +0100
@@ -0,0 +1,14 @@
+diff -urN biber-1.9/lib/Biber/Input/file/bibtex.pm biber-1.9.new/lib/Biber/Input/file/bibtex.pm
+--- biber-1.9/lib/Biber/Input/file/bibtex.pm 2016-06-07 16:55:35.000000000 +0100
++++ biber-1.9.new/lib/Biber/Input/file/bibtex.pm 2016-06-07 16:55:13.402781198 +0100
+@@ -1214,8 +1214,8 @@
+
+ sub _hack_month {
+ my $in_month = shift;
+- if ($in_month =~ m/\A\s*((?:jan|feb|mar|apr|may|jun|jul|aug|sep|oct|nov|dec).*)\s*\z/i) {
+- return $months{lc(Unicode::GCString->new($1)->substr(0,3)->as_string)};
++ if (my ($m) = $in_month =~ m/\A\s*((?:jan|feb|mar|apr|may|jun|jul|aug|sep|oct|nov|dec).*)\s*\z/i) {
++ return $months{lc(Unicode::GCString->new($m)->substr(0,3)->as_string)};
+ }
+ else {
+ return $in_month;
diff -Nru biber-1.9/debian/patches/series biber-1.9/debian/patches/series
--- biber-1.9/debian/patches/series 2014-12-24 23:45:26.000000000 +0000
+++ biber-1.9/debian/patches/series 2016-06-07 16:56:02.000000000 +0100
@@ -5,3 +5,4 @@
fix-slurp-unknown
fix-perl-warning
biber-fix-hyphenation
+fix-5.20.3
