[Catalyst-commits] r10403 - in Catalyst-Controller-SOAP/1.0/trunk: lib/Catalyst/Controller t

[ruoso at dev.catalyst.perl.org]

Author: ruoso
Date: 2009-05-31 12:29:51 +0000 (Sun, 31 May 2009)
New Revision: 10403

Modified:
   Catalyst-Controller-SOAP/1.0/trunk/lib/Catalyst/Controller/SOAP.pm
   Catalyst-Controller-SOAP/1.0/trunk/t/PostApp.t
Log:
[C-C-SOAP] fix the tests for win32

Modified: Catalyst-Controller-SOAP/1.0/trunk/lib/Catalyst/Controller/SOAP.pm
===================================================================
--- Catalyst-Controller-SOAP/1.0/trunk/lib/Catalyst/Controller/SOAP.pm	2009-05-31 01:57:00 UTC (rev 10402)
+++ Catalyst-Controller-SOAP/1.0/trunk/lib/Catalyst/Controller/SOAP.pm	2009-05-31 12:29:51 UTC (rev 10403)
@@ -12,7 +12,7 @@
     use constant NS_SOAP_ENV => "http://schemas.xmlsoap.org/soap/envelope/";
     use constant NS_WSDLSOAP => "http://schemas.xmlsoap.org/wsdl/soap/";
 
-    our $VERSION = '1.15';
+    our $VERSION = '1.16';
 
     __PACKAGE__->mk_accessors qw(wsdl wsdlobj decoders encoders
          ports wsdlservice xml_compile soap_action_prefix rpc_endpoint_paths);

Modified: Catalyst-Controller-SOAP/1.0/trunk/t/PostApp.t
===================================================================
--- Catalyst-Controller-SOAP/1.0/trunk/t/PostApp.t	2009-05-31 01:57:00 UTC (rev 10402)
+++ Catalyst-Controller-SOAP/1.0/trunk/t/PostApp.t	2009-05-31 12:29:51 UTC (rev 10403)
@@ -140,7 +140,7 @@
     my $path = shift;
     my $content = shift;
 
-    local %ENV;
+    local %ENV = %ENV;
     $ENV{REMOTE_ADDR} ='127.0.0.1';
     $ENV{CONTENT_LENGTH} = length $content;
     $ENV{CONTENT_TYPE} ='application/soap+xml';