From: Sébastien Aperghis-Tramoni <sebastien@aperghis.net>
Date: Wed, 11 Jan 2006 02:13:31 +0000 (+0100)
Subject: Fw: CPAN Upload: S/SA/SAPER/Sys-Syslog-0.13.tar.gz
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5f9a320f7db18c2f082bcc387670ef2c479af6b0;p=p5sagit%2Fp5-mst-13.2.git

Fw: CPAN Upload: S/SA/SAPER/Sys-Syslog-0.13.tar.gz
Message-ID: <1136942011.43c45bbb82dce@imp1-g19.free.fr>

p4raw-id: //depot/perl@26782
---

diff --git a/ext/Sys/Syslog/Changes b/ext/Sys/Syslog/Changes
index fb7f83c..0a0e15e 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 5974266..40b158e 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
     }
 }