svn commit: r1932003 - spamassassin/trunk/lib/Mail/SpamAssassin/Logger

Author: gbechis
Date: Mon Feb 23 11:18:19 2026
New Revision: 1932003

Log:
fix with Perl 5.40 and strict pragma

Modified:
   spamassassin/trunk/lib/Mail/SpamAssassin/Logger/Stderr.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Logger/Stderr.pm
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Logger/Stderr.pm	Mon Feb 23 11:08:49 2026	(r1932002)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Logger/Stderr.pm	Mon Feb 23 11:18:19 2026	(r1932003)
@@ -95,7 +95,7 @@ sub log_message {
     $msg =~ tr/\x09\x20\x00-\x1f/  _/s;
   }
 
-  my($nwrite) = syswrite(STDERR, sprintf("%s[%d] %s: %s%s",
+  my($nwrite) = syswrite(*STDERR, sprintf("%s[%d] %s: %s%s",
                                          $timestamp, $$, $level, $msg, $eol));
   defined $nwrite  or warn "error writing to log file: $!";
 }