Change 13649 by jhi@alpha on 2001/12/12 04:25:21
Must remember to require Socket.
Affected files ...
.... //depot/perl/ext/Sys/Syslog/syslog.t#5 edit
Differences ...
==== //depot/perl/ext/Sys/Syslog/syslog.t#5 (xtext) ====
Index: perl/ext/Sys/Syslog/syslog.t
--- perl/ext/Sys/Syslog/syslog.t.~1~ Tue Dec 11 21:30:06 2001
+++ perl/ext/Sys/Syslog/syslog.t Tue Dec 11 21:30:06 2001
@@ -13,6 +13,8 @@
exit 0;
}
+ require Socket;
+
# This code inspired by Sys::Syslog::connect():
require Sys::Hostname;
my ($host_uniq) = Sys::Hostname::hostname();
End of Patch.