summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Process
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-01-25 16:14:08 +0000
committerfukachan <fukachan>2001-01-25 16:14:08 +0000
commit06db3000c1bf25a41f216b8bf9812e5977f5c63f (patch)
treee3f21f92855e9a8b81db0e8470368c1f52c5b7d9 /fml/lib/FML/Process
parentfe1209542cddfdd1049ee1e8cc1323cf6e2cb5f1 (diff)
downloadfml8-06db3000c1bf25a41f216b8bf9812e5977f5c63f.tar.gz
fml8-06db3000c1bf25a41f216b8bf9812e5977f5c63f.tar.bz2
fml8-06db3000c1bf25a41f216b8bf9812e5977f5c63f.zip
change arguments for FML::Parse class.
save unix-from information at pcb in parsing process
Diffstat (limited to 'fml/lib/FML/Process')
-rw-r--r--fml/lib/FML/Process/Kernel.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/fml/lib/FML/Process/Kernel.pm b/fml/lib/FML/Process/Kernel.pm
index 25ad9c46..0341455b 100644
--- a/fml/lib/FML/Process/Kernel.pm
+++ b/fml/lib/FML/Process/Kernel.pm
@@ -204,7 +204,7 @@ sub parse_incoming_mail
# malloc the incoming message on memory.
# $r_msg is the reference to the memory area.
my $r_msg = {};
- ($r_msg->{'header'}, $r_msg->{'body'}) = new FML::Parse \*STDIN;
+ ($r_msg->{'header'}, $r_msg->{'body'}) = new FML::Parse $curproc, \*STDIN;
$curproc->{'incoming_mail'} = $r_msg;
}