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