Control: tags -1 + patch

Attached is the proposed debdiff for the t-p-u.

Regards,
Salvatore
diff -Nru libio-prompt-perl-0.997001/debian/changelog 
libio-prompt-perl-0.997001/debian/changelog
--- libio-prompt-perl-0.997001/debian/changelog 2010-04-25 18:06:43.000000000 
+0200
+++ libio-prompt-perl-0.997001/debian/changelog 2012-11-27 14:55:17.000000000 
+0100
@@ -1,3 +1,14 @@
+libio-prompt-perl (0.997001-1+deb7u1) testing-proposed-updates; urgency=low
+
+  * Add 694537-use-Scalar-Util-openhandle.patch patch.
+    IO::Prompt doesn't work on perl (>= 5.14) if prompt() is called in
+    non-"main" package with 'Can't call method "opened" without a package
+    or object reference at /usr/share/perl5/IO/Prompt.pm line 188.'.
+    Thanks to Michael Howe <michael.h...@it.ox.ac.uk> (Closes: #694537)
+  * Email change: Salvatore Bonaccorso -> car...@debian.org
+
+ -- Salvatore Bonaccorso <car...@debian.org>  Tue, 27 Nov 2012 14:54:29 +0100
+
 libio-prompt-perl (0.997001-1) unstable; urgency=low
 
   * New upstream release
diff -Nru libio-prompt-perl-0.997001/debian/control 
libio-prompt-perl-0.997001/debian/control
--- libio-prompt-perl-0.997001/debian/control   2010-04-25 18:06:43.000000000 
+0200
+++ libio-prompt-perl-0.997001/debian/control   2012-11-27 14:55:17.000000000 
+0100
@@ -7,7 +7,7 @@
 Maintainer: Debian Perl Group <pkg-perl-maintain...@lists.alioth.debian.org>
 Uploaders: gregor herrmann <gre...@debian.org>, Jonathan Yu <jaw...@cpan.org>,
  Gunnar Wolf <gw...@debian.org>, Niko Tyni <nt...@iki.fi>,
- Salvatore Bonaccorso <salvatore.bonacco...@gmail.com>
+ Salvatore Bonaccorso <car...@debian.org>
 Standards-Version: 3.8.4
 Homepage: http://search.cpan.org/dist/IO-Prompt/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libio-prompt-perl/
diff -Nru libio-prompt-perl-0.997001/debian/copyright 
libio-prompt-perl-0.997001/debian/copyright
--- libio-prompt-perl-0.997001/debian/copyright 2010-04-25 18:06:43.000000000 
+0200
+++ libio-prompt-perl-0.997001/debian/copyright 2012-11-27 14:55:17.000000000 
+0100
@@ -12,7 +12,7 @@
  2006, Gunnar Wolf <gw...@debian.org>
  2006, Niko Tyni <nt...@iki.fi>
  2010, Jonathan Yu <jaw...@cpan.org>
- 2010, Salvatore Bonaccorso <salvatore.bonacco...@gmail.com>
+ 2010, Salvatore Bonaccorso <car...@debian.org>
 License: Artistic or GPL-1+
 
 License: Artistic
diff -Nru libio-prompt-perl-0.997001/debian/gbp.conf 
libio-prompt-perl-0.997001/debian/gbp.conf
--- libio-prompt-perl-0.997001/debian/gbp.conf  1970-01-01 01:00:00.000000000 
+0100
+++ libio-prompt-perl-0.997001/debian/gbp.conf  2012-11-27 14:55:17.000000000 
+0100
@@ -0,0 +1,2 @@
+[DEFAULT]
+debian-branch = wheezy
diff -Nru 
libio-prompt-perl-0.997001/debian/patches/694537-use-Scalar-Util-openhandle.patch
 
libio-prompt-perl-0.997001/debian/patches/694537-use-Scalar-Util-openhandle.patch
--- 
libio-prompt-perl-0.997001/debian/patches/694537-use-Scalar-Util-openhandle.patch
   1970-01-01 01:00:00.000000000 +0100
+++ 
libio-prompt-perl-0.997001/debian/patches/694537-use-Scalar-Util-openhandle.patch
   2012-11-27 14:55:17.000000000 +0100
@@ -0,0 +1,23 @@
+Description: Doesn't work on 5.14 if you call prompt() in non-"main" package
+Origin: upstream, 
https://metacpan.org/diff/file/?target=DCONWAY/IO-Prompt-0.997002/lib/IO/Prompt.pm&source=DCONWAY/IO-Prompt-0.997001/lib/IO/Prompt.pm
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=69084
+Bug-Debian: http://bugs.debian.org/694537
+Forwarded: not-needed
+Author: Salvatore Bonaccorso <car...@debian.org>
+Last-Update: 2012-11-27
+Applied-Upstream: yes
+
+--- a/lib/IO/Prompt.pm
++++ b/lib/IO/Prompt.pm
+@@ -183,9 +183,10 @@
+         open $IN, "</dev/tty" or croak "Cannot read from terminal: $!";
+     }
+     else {
++        use Scalar::Util;
+         no strict 'refs';
+         my $ARGV = $caller . "::ARGV";
+-        unless (*$ARGV->opened) {
++        unless (Scalar::Util::openhandle(*$ARGV)) {
+             $$ARGV = shift(@$ARGV) || '-';
+             open $ARGV or croak "Can't open $$ARGV: $!";
+         }
diff -Nru libio-prompt-perl-0.997001/debian/patches/series 
libio-prompt-perl-0.997001/debian/patches/series
--- libio-prompt-perl-0.997001/debian/patches/series    2010-04-25 
18:06:43.000000000 +0200
+++ libio-prompt-perl-0.997001/debian/patches/series    2012-11-27 
14:55:17.000000000 +0100
@@ -1,2 +1,3 @@
 create-pty.patch
 add-shebang-to-examples.patch
+694537-use-Scalar-Util-openhandle.patch

Attachment: signature.asc
Description: Digital signature

Reply via email to