summaryrefslogtreecommitdiff
path: root/ext/Sys/Syslog/syslog.t
diff options
context:
space:
mode:
Diffstat (limited to 'ext/Sys/Syslog/syslog.t')
-rwxr-xr-xext/Sys/Syslog/syslog.t8
1 files changed, 6 insertions, 2 deletions
diff --git a/ext/Sys/Syslog/syslog.t b/ext/Sys/Syslog/syslog.t
index 72171f532b..9caecb4d6c 100755
--- a/ext/Sys/Syslog/syslog.t
+++ b/ext/Sys/Syslog/syslog.t
@@ -47,8 +47,12 @@ print "1..6\n";
if (Sys::Syslog::_PATH_LOG()) {
if (-e Sys::Syslog::_PATH_LOG()) {
- print defined(eval { setlogsock('unix') })
- ? "ok 1\n" : "not ok 1 # $!\n";
+ if ($^O =~ /^solaris$/) {
+ # we should check for stream support here, not for solaris
+ 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";
+ }
if (defined(eval { openlog('perl', 'ndelay', 'local0') })) {
print "ok 2\n";
print defined(eval { syslog('info', $test_string ) })