summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-03-03 17:11:55 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-03-03 17:11:55 +0000
commit68a5ccec238ff20626c185a03684f758a1c86e1b (patch)
treee76697b60a3e4b9d12157af5d63420803f187427 /t
parent2d967e397d11d72299918db17bcee3cb96a98e93 (diff)
downloadperl-68a5ccec238ff20626c185a03684f758a1c86e1b.tar.gz
Integrate changes #8997,8999 from maintperl.
Subject: [PATCH 5.6.1] compiling on OS/2 (Better error message from hints/os2.sh) Subject: [PATCH 5.6.1] syslog.t p4raw-link: @8999 on //depot/maint-5.6/perl: 1d1f4060a256037d3512259fe4c8a06dfa47e060 p4raw-link: @8997 on //depot/maint-5.6/perl: 44fb3a8ab385118a630b811ac7a33489c856e76b p4raw-id: //depot/perl@9000 p4raw-integrated: from //depot/maint-5.6/perl@8996 'copy in' hints/os2.sh (@8156..) 'merge in' t/lib/syslog.t (@8173..)
Diffstat (limited to 't')
-rwxr-xr-xt/lib/syslog.t9
1 files changed, 9 insertions, 0 deletions
diff --git a/t/lib/syslog.t b/t/lib/syslog.t
index 04adb6bed9..801e882508 100755
--- a/t/lib/syslog.t
+++ b/t/lib/syslog.t
@@ -22,6 +22,15 @@ BEGIN {
}
}
+BEGIN {
+ eval {require Sys::Syslog} or do {
+ if ($@ =~ /Your vendor has not/) {
+ print "1..0 # Skipped: missing macros\n";
+ exit 0;
+ }
+ }
+}
+
use Sys::Syslog qw(:DEFAULT setlogsock);
# Test this to 1 if your syslog accepts udp connections.