r8023 - in /trunk/libsys-syslog-perl/debian: changelog patches/eval_win32.patch patches/series
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Sat Sep 29 15:14:15 UTC 2007
Author: gregoa-guest
Date: Sat Sep 29 15:14:15 2007
New Revision: 8023
URL: http://svn.debian.org/wsvn/?sc=1&rev=8023
Log:
Add patch eval_win32.patch: don't try to use Sys::Syslog::Win32
(closes: #443878).
Added:
trunk/libsys-syslog-perl/debian/patches/eval_win32.patch
Modified:
trunk/libsys-syslog-perl/debian/changelog
trunk/libsys-syslog-perl/debian/patches/series
Modified: trunk/libsys-syslog-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libsys-syslog-perl/debian/changelog?rev=8023&op=diff
==============================================================================
--- trunk/libsys-syslog-perl/debian/changelog (original)
+++ trunk/libsys-syslog-perl/debian/changelog Sat Sep 29 15:14:15 2007
@@ -1,3 +1,10 @@
+libsys-syslog-perl (0.21-2) unstable; urgency=low
+
+ * Add patch eval_win32.patch: don't try to use Sys::Syslog::Win32
+ (closes: #443878).
+
+ -- gregor herrmann <gregor+debian at comodo.priv.at> Sat, 29 Sep 2007 17:13:49 +0200
+
libsys-syslog-perl (0.21-1) unstable; urgency=low
[ Damyan Ivanov ]
Added: trunk/libsys-syslog-perl/debian/patches/eval_win32.patch
URL: http://svn.debian.org/wsvn/trunk/libsys-syslog-perl/debian/patches/eval_win32.patch?rev=8023&op=file
==============================================================================
--- trunk/libsys-syslog-perl/debian/patches/eval_win32.patch (added)
+++ trunk/libsys-syslog-perl/debian/patches/eval_win32.patch Sat Sep 29 15:14:15 2007
@@ -1,0 +1,24 @@
+Index: libsys-syslog-perl/Syslog.pm
+===================================================================
+--- libsys-syslog-perl.orig/Syslog.pm 2007-09-29 17:04:14.000000000 +0200
++++ libsys-syslog-perl/Syslog.pm 2007-09-29 17:05:11.000000000 +0200
+@@ -106,12 +106,13 @@
+
+ # use EventLog on Win32
+ my $is_Win32 = $^O =~ /Win32/i;
+-eval "use Sys::Syslog::Win32";
+-
+-if (not $@) {
+- unshift @connectMethods, 'eventlog';
+-} elsif ($is_Win32) {
+- warn $@;
++if ($is_Win32) {
++ eval "use Sys::Syslog::Win32";
++ if (not $@) {
++ unshift @connectMethods, 'eventlog';
++ } else {
++ warn $@;
++ }
+ }
+
+ my @defaultMethods = @connectMethods;
Modified: trunk/libsys-syslog-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/trunk/libsys-syslog-perl/debian/patches/series?rev=8023&op=diff
==============================================================================
--- trunk/libsys-syslog-perl/debian/patches/series (original)
+++ trunk/libsys-syslog-perl/debian/patches/series Sat Sep 29 15:14:15 2007
@@ -1,2 +1,3 @@
skip-test-that-needs-dev-log.dpatch
fix-man-page-line-too-long.patch
+eval_win32.patch
More information about the Pkg-perl-cvs-commits
mailing list