https://bz.apache.org/SpamAssassin/show_bug.cgi?id=7230
anfi <[email protected]> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |[email protected] --- Comment #2 from anfi <[email protected]> --- (In reply to Mark Martinec from comment #1) > (In reply to anfi from comment #0) > > Mail::Spamassassin::Message::new(...) fails to process IO::File input. > > > > It fails with the following message: > > Can't locate object method "FILENO" via package "IO::Lines" at > > /usr/share/perl5/Mail/SpamAssassin/Message.pm line 160 > > > > 159 elsif (ref($message) eq 'GLOB' || ref($message) =~ /^IO::/) { > > 160 if (defined fileno $message) { > > Try: > > --- lib/Mail/SpamAssassin/Message.pm (revision 1693581) > +++ lib/Mail/SpamAssassin/Message.pm (working copy) > @@ -159,3 +159,3 @@ > elsif (ref($message) eq 'GLOB' || ref($message) =~ /^IO::/) { > - if (defined fileno $message) { > + if (!$message->UNIVERSAL::can("fileno") || defined fileno $message) { AFAIK will make SA read empty message without OBVIOUS explanation. IMHO it will make things worse without "else" part for "fileno if". > What interface module to SpamAssassin are you using? > Is it a MIMEDefang ? I have tested Mail::Box modules in my perl scripts for maildir processing. -- You are receiving this mail because: You are the assignee for the bug.
