packages: perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch - adjusted for 0.710.10

[amateja]

Author: amateja                      Date: Fri Oct  9 12:39:41 2009 GMT
Module: packages                      Tag: HEAD
---- Log message:
- adjusted for 0.710.10

---- Files affected:
packages/perl-SOAP-Lite:
   perl-SOAP-Lite-warnings.patch (1.1 -> 1.2) 

---- Diffs:

================================================================
Index: packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch
diff -u packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch:1.1 packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch:1.2
--- packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch:1.1	Mon Jun  2 17:32:03 2008
+++ packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch	Fri Oct  9 14:39:36 2009
@@ -1,18 +1,18 @@
-patch with help from
-http://groups.google.com/group/linux.debian.bugs.dist/browse_thread/thread/c1808cff6a5b90a0/971d98754aba2db7
-
---- SOAP-Lite-0.71/lib/SOAP/Transport/HTTP.pm~	2008-06-02 18:28:30.000000000 +0300
-+++ SOAP-Lite-0.71/lib/SOAP/Transport/HTTP.pm	2008-06-02 18:28:31.914669508 +0300
-@@ -37,10 +37,12 @@
+--- SOAP-Lite-0.710.10/lib/SOAP/Transport/HTTP.pm.orig	2009-10-09 14:36:37.000000000 +0200
++++ SOAP-Lite-0.710.10/lib/SOAP/Transport/HTTP.pm	2009-09-30 20:34:59.000000000 +0200
+@@ -38,13 +38,14 @@
      return if $_patched;
      BEGIN { local ($^W) = 0; }
      {
-+		no warnings "redefine";
-         sub LWP::UserAgent::redirect_ok; *LWP::UserAgent::redirect_ok = sub {1}
++        no warnings "redefine";
+         local $^W = 0;
+         sub LWP::UserAgent::redirect_ok;
+         *LWP::UserAgent::redirect_ok = sub { 1 }
      }
      {
+-
          package LWP::Protocol;
-+		no warnings "redefine";
-         my $collect = \&collect; # store original
++        no warnings "redefine";
+         local $^W = 0;
+         my $collect = \&collect;    # store original
          *collect = sub {
-             if (defined $_[2]->header('Connection')
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/packages/perl-SOAP-Lite/perl-SOAP-Lite-warnings.patch?r1=1.1&r2=1.2&f=u