diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-09-14 09:44:49 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-09-14 09:44:49 +0000 |
| commit | e9aaaa2f43bd40ac407c76cf22a1e7e22a7c625b (patch) | |
| tree | f96179db466b383ec4180a18c44a19f7bf9773c0 /ext/Sys | |
| parent | ad1c95008f60417d352b3b69be994ff9e4297763 (diff) | |
| download | perl-e9aaaa2f43bd40ac407c76cf22a1e7e22a7c625b.tar.gz | |
Also IRIX wants setlogsock('stream').
p4raw-id: //depot/perl@21227
Diffstat (limited to 'ext/Sys')
| -rw-r--r-- | ext/Sys/Syslog/Syslog.pm | 1 | ||||
| -rwxr-xr-x | ext/Sys/Syslog/t/syslog.t | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/ext/Sys/Syslog/Syslog.pm b/ext/Sys/Syslog/Syslog.pm index a63c8bc3ce..13598e7de0 100644 --- a/ext/Sys/Syslog/Syslog.pm +++ b/ext/Sys/Syslog/Syslog.pm @@ -88,6 +88,7 @@ systems a character special device) returned by the C<_PATH_LOG> macro (if your system defines it), or F</dev/log> or F</dev/conslog>, whatever is writable. A value of 'stream' will connect to the stream indicated by the pathname provided as the optional second parameter. +(For example Solaris and IRIX require 'stream' instead of 'unix'.) A value of 'inet' will connect to an INET socket (either tcp or udp, tried in that order) returned by getservbyname(). 'tcp' and 'udp' can also be given as values. The value 'console' will send messages diff --git a/ext/Sys/Syslog/t/syslog.t b/ext/Sys/Syslog/t/syslog.t index 9caecb4d6c..cf38032551 100755 --- a/ext/Sys/Syslog/t/syslog.t +++ b/ext/Sys/Syslog/t/syslog.t @@ -47,8 +47,8 @@ print "1..6\n"; if (Sys::Syslog::_PATH_LOG()) { if (-e Sys::Syslog::_PATH_LOG()) { - if ($^O =~ /^solaris$/) { - # we should check for stream support here, not for solaris + if ($^O =~ /^(solaris|irix)$/) { + # we should check for stream support here, not for solaris/irix print defined(eval { setlogsock('stream') }) ? "ok 1\n" : "not ok 1 # $!\n"; } else { print defined(eval { setlogsock('unix') }) ? "ok 1\n" : "not ok 1 # $!\n"; |