Actually submit previous change.

[p5sagit/p5-mst-13.2.git] / ext / Encode / EBCDIC / EBCDIC.pm

diff --git a/ext/Encode/EBCDIC/EBCDIC.pm b/ext/Encode/EBCDIC/EBCDIC.pm
index 545b90c..8024c13 100644 (file)
--- a/ext/Encode/EBCDIC/EBCDIC.pm
+++ b/ext/Encode/EBCDIC/EBCDIC.pm
@@ -1,9 +1,11 @@
 package Encode::EBCDIC;
+use strict;
+use warnings;
 use Encode;
-our $VERSION = do { my @r = (q$Revision: 1.0 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+our $VERSION = do { my @r = ( q$Revision: 2.2 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };
 
 use XSLoader;
-XSLoader::load('Encode::EBCDIC',$VERSION);
+XSLoader::load( __PACKAGE__, $VERSION );
 
 1;
 __END__
@@ -25,8 +27,11 @@ supported are as follows.
 
   Canonical   Alias            Description
   --------------------------------------------------------------------
-  cp1047
-  cp37
+  cp37  
+  cp500  
+  cp875  
+  cp1026  
+  cp1047  
   posix-bc
 
 =head1 DESCRIPTION