summaryrefslogtreecommitdiff
path: root/fml/lib/Mail/Message.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-01-16 14:01:14 +0000
committerfukachan <fukachan>2002-01-16 14:01:14 +0000
commit4034084fcb93ab8a2cfa71dfec46ae925fa53a1a (patch)
tree15b6dafac7b9ecedd25609fa6a05319e3d3c4a11 /fml/lib/Mail/Message.pm
parent146604e0ca356391d0f972decc029c74a156f5ee (diff)
downloadfml8-4034084fcb93ab8a2cfa71dfec46ae925fa53a1a.tar.gz
fml8-4034084fcb93ab8a2cfa71dfec46ae925fa53a1a.tar.bz2
fml8-4034084fcb93ab8a2cfa71dfec46ae925fa53a1a.zip
oops, forgotten. fix head_message() -> __head_message()
Diffstat (limited to 'fml/lib/Mail/Message.pm')
-rw-r--r--fml/lib/Mail/Message.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/Mail/Message.pm b/fml/lib/Mail/Message.pm
index 41259af4..4be94d32 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.44 2002/01/13 15:19:52 fukachan Exp $
+# $FML: Message.pm,v 1.45 2002/01/16 13:34:01 fukachan Exp $
#
package Mail::Message;
@@ -967,7 +967,7 @@ sub _print
sub _is_head_message
{
my ($self) = @_;
- my $hm = $self->head_message;
+ my $hm = $self->__head_message;
($hm eq $self) ? 1 : 0;
}