Change 26782 by [EMAIL PROTECTED] on 2006/01/11 12:25:24
Subject: Fw: CPAN Upload: S/SA/SAPER/Sys-Syslog-0.13.tar.gz
From: Sébastien Aperghis-Tramoni <[EMAIL PROTECTED]>
Date: Wed, 11 Jan 2006 02:13:31 +0100
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/ext/Sys/Syslog/Changes#4 edit
... //depot/perl/ext/Sys/Syslog/Syslog.pm#42 edit
Differences ...
==== //depot/perl/ext/Sys/Syslog/Changes#4 (text) ====
Index: perl/ext/Sys/Syslog/Changes
--- perl/ext/Sys/Syslog/Changes#3~26752~ 2006-01-09 05:44:20.000000000
-0800
+++ perl/ext/Sys/Syslog/Changes 2006-01-11 04:25:24.000000000 -0800
@@ -1,5 +1,18 @@
Revision history for Sys-Syslog
+0.13 2006.01.11
+ [CODE] Merged [EMAIL PROTECTED]: If getservbyname fails tell what
service
+ the lookup attempt tried to use.
+ [CODE] Merged [EMAIL PROTECTED]: suppress Sys::Hostname usage and
directly
+ use INADDR_LOOPBACK.
+ [CODE] Merged [EMAIL PROTECTED]: $host needs to stay in case the user
sets it.
+ [CODE] Merged [EMAIL PROTECTED]: 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.
==== //depot/perl/ext/Sys/Syslog/Syslog.pm#42 (text) ====
Index: perl/ext/Sys/Syslog/Syslog.pm
--- perl/ext/Sys/Syslog/Syslog.pm#41~26773~ 2006-01-10 08:59:25.000000000
-0800
+++ perl/ext/Sys/Syslog/Syslog.pm 2006-01-11 04:25:24.000000000 -0800
@@ -53,7 +53,7 @@
=head1 VERSION
-Version 0.12
+Version 0.13
=head1 SYNOPSIS
@@ -799,10 +799,7 @@
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
}
}
End of Patch.
