summaryrefslogtreecommitdiff
path: root/fml/lib/Mail/Message/Encode.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2003-11-08 05:56:22 +0000
committerfukachan <fukachan>2003-11-08 05:56:22 +0000
commit8863e878360eeda055ecbe0060392628bb3c9d5c (patch)
tree820255b752cdcc24b06792393bb04ff40c652517 /fml/lib/Mail/Message/Encode.pm
parent7c8aad567c12e7cb04c94fc95a261f635a3ad36b (diff)
downloadfml8-8863e878360eeda055ecbe0060392628bb3c9d5c.tar.gz
fml8-8863e878360eeda055ecbe0060392628bb3c9d5c.tar.bz2
fml8-8863e878360eeda055ecbe0060392628bb3c9d5c.zip
disable Encode use even on >= 5.008 since we are not ready
Diffstat (limited to 'fml/lib/Mail/Message/Encode.pm')
-rw-r--r--fml/lib/Mail/Message/Encode.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/fml/lib/Mail/Message/Encode.pm b/fml/lib/Mail/Message/Encode.pm
index 735055d2..7cb1cff7 100644
--- a/fml/lib/Mail/Message/Encode.pm
+++ b/fml/lib/Mail/Message/Encode.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Encode.pm,v 1.14 2003/08/23 04:35:47 fukachan Exp $
+# $FML: Encode.pm,v 1.15 2003/09/08 09:17:51 fukachan Exp $
#
package Mail::Message::Encode;
@@ -39,8 +39,9 @@ sub new
my ($type) = ref($self) || $self;
my $me = {};
- if ($] > 5.008) {
- eval q{ Encode;};
+ # XXX we do not use Encode yet, so disabled anyway.
+ if (0 && $] > 5.008) {
+ eval q{ use Encode;};
croak("cannot load Encode") if $@;
}
elsif ($] <= 5.006001) {