perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Doug MacEachern <do...@pobox.com>
Subject [PATCH v5.5.660] Fcntl.pm
Date Wed, 01 Mar 2000 05:24:00 GMT
mod_perl-1.21_01-dev fails the modules/cgi test due to a bug in Fcntl.pm
all the modules are reloaded when the server starts, but Fcntl.pm fails to
reload because of this bug.
looks like a copy-n-pasto.

--- Fcntl.pm~   Tue Feb 22 12:17:28 2000
+++ Fcntl.pm    Tue Feb 29 19:00:46 2000
@@ -323,8 +323,8 @@
 sub S_ISBLK    ($) { ( $_[0] & _S_IFMT ) == S_IFBLK   }
 sub S_ISCHR    ($) { ( $_[0] & _S_IFMT ) == S_IFCHR   }
 sub S_ISFIFO   ($) { ( $_[0] & _S_IFMT ) == S_IFIFO   }
-sub S_ISWHT    ($) { ( $_[0] & _S_IFMT ) == S_ISWHT   }
-sub S_ISENFMT  ($) { ( $_[0] & _S_IFMT ) == S_ISENFMT }
+sub S_ISWHT    ($) { ( $_[0] & _S_IFMT ) == S_IFWHT   }
+sub S_ISENFMT  ($) { ( $_[0] & _S_IFMT ) == S_IFENFMT }
 
 sub AUTOLOAD {
     (my $constname = $AUTOLOAD) =~ s/.*:://;



Mime
View raw message