diff options
-rw-r--r-- | ext/Sys/Syslog/Changes | 13 | ||||
-rw-r--r-- | ext/Sys/Syslog/Syslog.pm | 7 |
2 files changed, 15 insertions, 5 deletions
diff --git a/ext/Sys/Syslog/Changes b/ext/Sys/Syslog/Changes index fb7f83cde7..0a0e15e147 100644 --- a/ext/Sys/Syslog/Changes +++ b/ext/Sys/Syslog/Changes @@ -1,5 +1,18 @@ Revision history for Sys-Syslog +0.13 2006.01.11 + [CODE] Merged blead@26768: If getservbyname fails tell what service + the lookup attempt tried to use. + [CODE] Merged blead@26769: suppress Sys::Hostname usage and directly + use INADDR_LOOPBACK. + [CODE] Merged blead@26772: $host needs to stay in case the user sets it. + [CODE] Merged blead@26773: check that $syslog_path is a socket. + [TESTS] RT#16980 (Alan Burlison): Sys::Syslog blows up rather + spectacularly on Solaris. Corrected by previous patches. + [TESTS] Applied Gisle Aas patch for a better handling of error messages, + then optimized it. + [TESTS] RT#16974: Failed test in t/podspell. This test is now skipped. + 0.12 2006.01.07 [CODE] Merged some modifications from bleadperl. [DOC] Added a link to an article about Sys::Syslog. diff --git a/ext/Sys/Syslog/Syslog.pm b/ext/Sys/Syslog/Syslog.pm index 5974266da2..40b158e288 100644 --- a/ext/Sys/Syslog/Syslog.pm +++ b/ext/Sys/Syslog/Syslog.pm @@ -53,7 +53,7 @@ Sys::Syslog - Perl interface to the UNIX syslog(3) calls =head1 VERSION -Version 0.12 +Version 0.13 =head1 SYNOPSIS @@ -799,10 +799,7 @@ sub connect { my($old) = select(SYSLOG); $| = 1; select($old); } else { @fallbackMethods = (); - foreach my $err (@errs) { - carp $err; - } - croak "no connection to syslog available"; + croak join "\n\t- ", "no connection to syslog available", @errs } } |