summaryrefslogtreecommitdiff
path: root/cpan/Encode/encoding.pm
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2011-08-09 10:02:28 +0100
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2011-08-09 11:25:57 +0100
commite46d973584785af1f445c4dedbee4243419cb860 (patch)
tree3993978bd4a3291fb92d9d3633d030cf74c557b1 /cpan/Encode/encoding.pm
parent1bfdb6af4f349a4b4de3ed9a093dab259c05c37e (diff)
downloadperl-e46d973584785af1f445c4dedbee4243419cb860.tar.gz
Update Encode to CPAN version 2.44
[DELTA] $Revision: 2.44 $ $Date: 2011/08/09 07:49:44 $ ! Unicode/Unicode.xs Addressed the following: Date: Fri, 22 Jul 2011 13:58:43 +0200 From: Robert Zacek <zacek@avast.com> To: perl5-security-report@perl.org Subject: Unicode.xs!decode_xs n-byte heap-overflow ! Encode.pm encoding.pm ! lib/Encode/Alias.pm lib/Encode/Encoder.pm lib/Encode/Guess.pm Applied: RT#69735: patch for use constant DEBUG => https://rt.cpan.org/Ticket/Update.html?id=69735
Diffstat (limited to 'cpan/Encode/encoding.pm')
-rw-r--r--cpan/Encode/encoding.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/cpan/Encode/encoding.pm b/cpan/Encode/encoding.pm
index be20a49448..24d6e5b66c 100644
--- a/cpan/Encode/encoding.pm
+++ b/cpan/Encode/encoding.pm
@@ -1,4 +1,4 @@
-# $Id: encoding.pm,v 2.8 2009/02/15 17:44:13 dankogai Exp $
+# $Id: encoding.pm,v 2.9 2011/08/09 07:49:44 dankogai Exp dankogai $
package encoding;
our $VERSION = '2.6_01';
@@ -6,7 +6,7 @@ use Encode;
use strict;
use warnings;
-sub DEBUG () { 0 }
+use constant DEBUG => !!$ENV{PERL_ENCODE_DEBUG};
BEGIN {
if ( ord("A") == 193 ) {