You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by mm...@apache.org on 2009/08/06 19:19:08 UTC
svn commit: r801734 - /spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm
Author: mmartinec
Date: Thu Aug 6 17:19:08 2009
New Revision: 801734
URL: http://svn.apache.org/viewvc?rev=801734&view=rev
Log:
Bug 5656: allow message to be fed to SA by any IO::* object,
not just by IO::File or GLOB
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm?rev=801734&r1=801733&r2=801734&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Message.pm Thu Aug 6 17:19:08 2009
@@ -131,7 +131,7 @@
if (ref $message eq 'ARRAY') {
@message = @{$message};
}
- elsif (ref $message eq 'GLOB' || ref $message eq 'IO::File') {
+ elsif (ref $message eq 'GLOB' || ref $message =~ /^IO::/) {
if (defined fileno $message) {
# sysread+split avoids a Perl I/O bug (Bug 5985)