Upgrade to Encode 2.05
Rafael Garcia-Suarez [Tue, 19 Oct 2004 13:17:01 +0000 (13:17 +0000)]
p4raw-id: //depot/perl@23384

ext/Encode/Changes
ext/Encode/Encode.pm
ext/Encode/META.yml
ext/Encode/encoding.pm

index 9f15ee5..1cffc39 100644 (file)
@@ -1,9 +1,16 @@
 # Revision history for Perl extension Encode.
 #
-# $Id: Changes,v 2.4 2004/10/16 21:22:44 dankogai Exp dankogai $
+# $Id: Changes,v 2.5 2004/10/19 04:55:01 dankogai Exp dankogai $
 #
 
-$Revision: 2.4 $ $Date: 2004/10/16 21:22:44 $
+$Revision: 2.5 $ $Date: 2004/10/19 04:55:01 $
+! encoding.pm
+  "unnuke" jhi's patch in bleedperl, with minor correction by dankogai.
+  Message-ID: <41210A84.6060506@iki.fi>
+  Message-ID: <20041018233442.7418113f@r2d2>
+  Message-Id: <2BA3DAC4-218A-11D9-906D-000A95DBB50A@dan.co.jp>
+
+2.04 2004/10/16 21:22:44
 ! Makefle.PL 
   From:   craigberry@mac.com
   Subject: [PATCH ext/Encode/Makefile.PL] make Encode.c dependency explicit
index ab80547..266efc6 100644 (file)
@@ -1,9 +1,9 @@
 #
-# $Id: Encode.pm,v 2.4 2004/10/16 21:22:31 dankogai Exp $
+# $Id: Encode.pm,v 2.5 2004/10/19 04:54:43 dankogai Exp $
 #
 package Encode;
 use strict;
-our $VERSION = do { my @r = (q$Revision: 2.4 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+our $VERSION = do { my @r = (q$Revision: 2.5 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
 sub DEBUG () { 0 }
 use XSLoader ();
 XSLoader::load(__PACKAGE__, $VERSION);
index b6a6513..5a25863 100644 (file)
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Encode
-version:      2.04
+version:      2.05
 version_from: Encode.pm
 installdirs:  perl
 requires:
index b398301..6eccc7e 100644 (file)
@@ -1,6 +1,6 @@
-# $Id: encoding.pm,v 2.01 2004/05/16 20:55:16 dankogai Exp $
+# $Id: encoding.pm,v 2.1 2004/10/19 04:55:01 dankogai Exp dankogai $
 package encoding;
-our $VERSION = do { my @r = (q$Revision: 2.01 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+our $VERSION = do { my @r = (q$Revision: 2.1 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
 
 use Encode;
 use strict;
@@ -127,7 +127,7 @@ sub import {
                           $status ;
                       });
        };
-        $@ == '' and DEBUG and warn "Filter installed";
+        $@ eq '' and DEBUG and warn "Filter installed";
     }
     defined ${^UNICODE} and ${^UNICODE} != 0 and return 1;
     for my $h (qw(STDIN STDOUT)){