[PATCH] Encode::Encoding

[Tatsuhiko Miyagawa]

  package Encode::MyEncoding;
  use base qw(Encode::Encoding);

  __PACKAGE__->Define(qw(myCanonical myAlias));

dies saying:

   Error:  Undefined subroutine &Encode::define_encoding called at ...

Patch follows after sig.

--
Tatsuhiko Miyagawa <[EMAIL PROTECTED]>


--- lib/Encode/Encoding.pm~     Sun Apr 28 05:09:05 2002
+++ lib/Encode/Encoding.pm      Mon May  6 18:48:59 2002
@@ -3,6 +3,8 @@
 use strict;
 our $VERSION = do { my @r = (q$Revision: 1.29 $ =~ /\d+/g); sprintf "%d."."%02d" x 
$#r, @r };
 
+require Encode;
+
 sub Define
 {
     my $obj = shift;