This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: (perl-current of 5.9.5) patch for ext/Sys/Syslog/Makefile.PL for
[perl5.git] / ext / Sys / Syslog / Makefile.PL
index 2c60688..277fff8 100644 (file)
@@ -108,7 +108,7 @@ elsif (-p "/dev/log" and -w _) {
     # On HP-UX, /dev/log isn't a unix domain socket but a named pipe.
     $_PATH_LOG = "/dev/log";
 }
-elsif (-S "/dev/log" and -w _) {
+elsif ((-S "/dev/log" or -c _) and -w _) {
     # Most unixes have a unix domain socket /dev/log.
     $_PATH_LOG = "/dev/log";
 }