Mailing List Archive

svn commit: rev 6312 - incubator/spamassassin/trunk/lib/Mail/SpamAssassin
Author: felicity
Date: Mon Jan 26 19:29:54 2004
New Revision: 6312

Modified:
incubator/spamassassin/trunk/lib/Mail/SpamAssassin/CmdLearn.pm
Log:
bug 2968: sa-learn failed because there's no more 'get' function...

Modified: incubator/spamassassin/trunk/lib/Mail/SpamAssassin/CmdLearn.pm
==============================================================================
--- incubator/spamassassin/trunk/lib/Mail/SpamAssassin/CmdLearn.pm (original)
+++ incubator/spamassassin/trunk/lib/Mail/SpamAssassin/CmdLearn.pm Mon Jan 26 19:29:54 2004
@@ -293,7 +293,7 @@
$messagecount++;
my $ma = Mail::SpamAssassin::MsgParser->parse ($dataref);

- if ($ma->get ("X-Spam-Checker-Version")) {
+ if ($ma->get_header ("X-Spam-Checker-Version")) {
my $newtext = $spamtest->remove_spamassassin_markup($ma);
my @newtext = split (/^/m, $newtext);
$dataref = \@newtext;