r3864 - in /packages/libtext-typography-perl/trunk/debian: changelog
patches/ patches/no-warnings.patch
roktas at users.alioth.debian.org
roktas at users.alioth.debian.org
Thu Sep 21 00:42:39 UTC 2006
Author: roktas
Date: Thu Sep 21 00:42:38 2006
New Revision: 3864
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=3864
Log:
* Add a patch to surpress 'uninitialized value' warnings. The original
code has indeed a backward compatible 'local $^W = 0' statement, but
it doesn't work in perl v5.8.4. The patch was sent to upstream also.
Added:
packages/libtext-typography-perl/trunk/debian/patches/
packages/libtext-typography-perl/trunk/debian/patches/no-warnings.patch
Modified:
packages/libtext-typography-perl/trunk/debian/changelog
Modified: packages/libtext-typography-perl/trunk/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libtext-typography-perl/trunk/debian/changelog?rev=3864&op=diff
==============================================================================
--- packages/libtext-typography-perl/trunk/debian/changelog (original)
+++ packages/libtext-typography-perl/trunk/debian/changelog Thu Sep 21 00:42:38 2006
@@ -1,5 +1,8 @@
libtext-typography-perl (0.01-1) unstable; urgency=low
+ * Add a patch to surpress 'uninitialized value' warnings. The original
+ code has indeed a backward compatible 'local $^W = 0' statement, but
+ it doesn't work in perl v5.8.4. The patch was sent to upstream also.
* Initial Release. Closes: #387846
-- Recai OktaÅ <roktas at debian.org> Sun, 17 Sep 2006 03:06:29 +0300
Added: packages/libtext-typography-perl/trunk/debian/patches/no-warnings.patch
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libtext-typography-perl/trunk/debian/patches/no-warnings.patch?rev=3864&op=file
==============================================================================
--- packages/libtext-typography-perl/trunk/debian/patches/no-warnings.patch (added)
+++ packages/libtext-typography-perl/trunk/debian/patches/no-warnings.patch Thu Sep 21 00:42:38 2006
@@ -1,0 +1,11 @@
+diff -rup a/libtext-typography-perl/lib/Text/Typography.pm b/libtext-typography-perl/lib/Text/Typography.pm
+--- a/libtext-typography-perl/lib/Text/Typography.pm 2006-09-21 00:36:07.000000000 +0300
++++ b/libtext-typography-perl/lib/Text/Typography.pm 2006-09-21 03:31:23.000000000 +0300
+@@ -502,6 +502,7 @@ sub EducateQuotes {
+ # even when it's undefined. Use $^W instead of "no warnings"
+ # for compatibility with Perl 5.005:
+ local $^W = 0;
++ local $SIG{__WARN__} = sub {};
+
+
+ # Make our own "punctuation" character class, because the POSIX-style
More information about the Pkg-perl-cvs-commits
mailing list