You are viewing a plain text version of this content. The canonical link for it is here.

Posted to commits@spamassassin.apache.org by jm...@apache.org on 2007/07/27 19:15:14 UTC

svn commit: r560322 - /spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm

Author: jm
Date: Fri Jul 27 10:15:14 2007
New Revision: 560322

URL: http://svn.apache.org/viewvc?view=rev&rev=560322
Log:
bug 5574: fix DCC and Pyzor checks to correctly perform setuid with perl 5.8.x

Modified:
    spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm?view=diff&rev=560322&r1=560321&r2=560322
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Util.pm Fri Jul 27 10:15:14 2007
@@ -1336,6 +1336,7 @@
     # bug 3586: kludges needed to work around platform dependent behavior assigning to $<
     #  The POSIX functions deal with that so just use it here
     POSIX::setuid($touid);
+    $< = $touid; $> = $touid;       # bug 5574
 
     # Check that we have now accomplished the setuid: catch bug 3586 if it comes back
     if ($< != $touid) {