diff options
| author | fukachan <fukachan> | 2001-11-19 14:34:31 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-19 14:34:31 +0000 |
| commit | 11e2ac795ed22558d769c0bbad3038a5d626015f (patch) | |
| tree | ca3c74100f8bbced28914441bf0b7479acf60420 /fml/lib/Mail/ThreadTrack | |
| parent | 62f0b09418aea8f428455e4a39641b8754404785 (diff) | |
| download | fml8-11e2ac795ed22558d769c0bbad3038a5d626015f.tar.gz fml8-11e2ac795ed22558d769c0bbad3038a5d626015f.tar.bz2 fml8-11e2ac795ed22558d769c0bbad3038a5d626015f.zip | |
check get_first_plaintext_message() return value
Diffstat (limited to 'fml/lib/Mail/ThreadTrack')
| -rw-r--r-- | fml/lib/Mail/ThreadTrack/Analyze.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fml/lib/Mail/ThreadTrack/Analyze.pm b/fml/lib/Mail/ThreadTrack/Analyze.pm index 32c3cd4e..8d518e58 100644 --- a/fml/lib/Mail/ThreadTrack/Analyze.pm +++ b/fml/lib/Mail/ThreadTrack/Analyze.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: Analyze.pm,v 1.14 2001/11/09 15:08:49 fukachan Exp $ +# $FML: Analyze.pm,v 1.15 2001/11/18 08:58:54 fukachan Exp $ # package Mail::ThreadTrack::Analyze; @@ -243,7 +243,7 @@ sub update_thread_status my $header = $msg->rfc822_message_header(); my $textmsg = $msg->get_first_plaintext_message(); - $content = $textmsg->data_in_body_part(); + $content = $textmsg->data_in_body_part() if defined $textmsg; $subject = $header->get('subject') || ''; $pragma = $header->get('x-thread-pragma') || $pragma || ''; @@ -269,7 +269,7 @@ sub _is_ignore $header = $msg->rfc822_message_header(); $textmsg = $msg->get_first_plaintext_message(); - $content = $textmsg->data_in_body_part(); + $content = $textmsg->data_in_body_part() if defined $textmsg; # check header while (($field, $rule) = each %$filterlist) { |