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