perl-5.8.1 hints/powerux.sh, ext/Sys/Syslog/t/syslog.t

[perl5.git] / ext / Sys / Syslog / t / syslog.t

diff --git a/ext/Sys/Syslog/t/syslog.t b/ext/Sys/Syslog/t/syslog.t
index bffecaf..8f038d3 100755 (executable)
--- a/ext/Sys/Syslog/t/syslog.t
+++ b/ext/Sys/Syslog/t/syslog.t
@@ -49,7 +49,7 @@ if (Sys::Syslog::_PATH_LOG()) {
     if (-e Sys::Syslog::_PATH_LOG()) {
        # The only known $^O eq 'svr4' that needs this is NCR MP-RAS,
        # but assuming 'stream' in SVR4 is probably not that bad.
-        if ($^O =~ /^(solaris|irix|svr4)$/) {
+        if ($^O =~ /^(solaris|irix|svr4|powerux)$/) {
             # we should check for stream support here, not for solaris/irix
             print defined(eval { setlogsock('stream') }) ? "ok 1\n" : "not ok 1 # $!\n";
         } else {