From 91d6f1fb0bf6dc10406b648044883c822eeff536 Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Sun, 28 Apr 2002 10:19:23 +0000
Subject: new() not need $InComingMessage here

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

diff --git a/fml/lib/Mail/Message.pm b/fml/lib/Mail/Message.pm
index 17be45e5..e0e57855 100644
--- a/fml/lib/Mail/Message.pm
+++ b/fml/lib/Mail/Message.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: Message.pm,v 1.55 2002/04/27 05:21:41 fukachan Exp $
+# $FML: Message.pm,v 1.56 2002/04/28 09:42:17 fukachan Exp $
 #
 
 package Mail::Message;
@@ -240,8 +240,9 @@ sub new
     my $me     = {};
     my $data   = '';
 
-    # alloc memory area to hold the whole message.
-    $InComingMessage = \$data;
+    # XXX alloc memory area to hold the whole message.
+    # XXX (NOT NEEDED ? but only parse() needs $InComingMessage ?)
+    # $InComingMessage = \$data;
 
     bless $me, $type;
 
-- 
cgit v1.2.1