Package: release.debian.org
Severity: normal
User: release.debian....@packages.debian.org
Usertags: tpu

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA512

Hi Release Team

On IRC I asked how to handle this, and Neil McGovern stated would be
fine to file this t-p-u upload request (could be considered serious).

It's about #694537 in libio-prompt-perl

I have prepared an update targeting t-p-u. Debdiff is attached.

If required I can also drop the following two changes: 1) email change
and 2) the addition of debian/gbp.conf for the pkg-perl git repos.

Regards and thanks for your work
Salvatore

- -- System Information:
Debian Release: wheezy/sid
  APT prefers unstable
  APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.32-5-amd64 (SMP w/8 CPU cores)
Locale: LANG=C, LC_CTYPE=C (charmap=ANSI_X3.4-1968)
Shell: /bin/sh linked to /bin/dash

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.12 (GNU/Linux)

iQIcBAEBCgAGBQJQtOluAAoJEHidbwV/2GP+rlgP/0a+s9fY3VBh2FfoltWoNqOB
zNMyxrDGMypY5GXTgRA0Ge0Ou44QznJx4Qp99d1kKrfMWxGUP0pQvH4N7Uoen3Wg
iOB3nLpEpBebGlrl4trfXtdZS2fIVeQK6fwDNqY9nWavXFQJ+SNveKEMwLZn2G/R
U3cc+qiwabvp9SJrQOZWlkA/mv0iQKknWnhD+wrI1ucNbx78S/eR0WOh6PEpk5Nj
/l/7A2bz3MZ51qCr4J6y+Y0quE0onXiOTi+2uTRSOviDO2xSed2QDsrch+kfg0Su
QzURsBKoLuqxe7sd8ytmF0My0XKlByFFNMqiVyuNlHsSLBkKZPwbnxM/Vqk5ACpj
dvcQ/ykI02paOrrSKugbapRt5S5FxrQYL2hfQ5uI5591yVIlxhMfYKz8EhraKA0h
w/N9QNFSlV4fF1WEpCPpDukoKGL63/zuiSX8HQqA7yPv5gCKjw3o0QJaTEVPFtAJ
ms4FYNh3KLAjKgNkkHQxBzGyJsWu1yKUX/bpGe3GAo2vs+74iaXLB7/JSlsKsVHn
+7vkLWK70j1kxLd7gYHKszNi2N/byoIRUq1ARDCo5KtnWiw/AqWFiQS9xi4i0V3p
O3TLIcerfEK+DGtXkM9ySOBnJeiBUAd2phTkJYwhV+J4GQ3BubLc7AxN5vlOVzNC
wOaJUGMU4RWdo6yibOB6
=MXuH
-----END PGP SIGNATURE-----
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 17:01:34.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 17:01:34.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 17:01:34.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 17:01:34.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 17:01:34.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 17:01:34.000000000 +0100
@@ -1,2 +1,3 @@
 create-pty.patch
 add-shebang-to-examples.patch
+694537-use-Scalar-Util-openhandle.patch

Reply via email to