From 8863e878360eeda055ecbe0060392628bb3c9d5c Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Sat, 8 Nov 2003 05:56:22 +0000
Subject: disable Encode use even on >= 5.008 since we are not ready

---
 fml/lib/Mail/Message/Encode.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'fml/lib/Mail/Message/Encode.pm')

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) {
-- 
cgit v1.2.1