Upgrade to Encode 2.18

[p5sagit/p5-mst-13.2.git] / ext / Encode / lib / Encode / MIME / Header / ISO_2022_JP.pm

diff --git a/ext/Encode/lib/Encode/MIME/Header/ISO_2022_JP.pm b/ext/Encode/lib/Encode/MIME/Header/ISO_2022_JP.pm
index 6d3ea46..4abfbd0 100644 (file)
--- a/ext/Encode/lib/Encode/MIME/Header/ISO_2022_JP.pm
+++ b/ext/Encode/lib/Encode/MIME/Header/ISO_2022_JP.pm
@@ -1,6 +1,8 @@
 package Encode::MIME::Header::ISO_2022_JP;
 
 use strict;
+use warnings;
+
 use base qw(Encode::MIME::Header);
 
 $Encode::Encoding{'MIME-Header-ISO_2022_JP'} =
@@ -12,7 +14,7 @@ use constant TAIL => '?=';
 
 use Encode::CJKConstants qw(%RE);
 
-our $VERSION = do { my @r = ( q$Revision: 1.2 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };
+our $VERSION = do { my @r = ( q$Revision: 1.3 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };
 
 # I owe the below codes totally to
 #   Jcode by Dan Kogai & http://www.din.or.jp/~ohzaki/perl.htm#JP_Base64