import SOAP-WSDL 2.00_27 from CPAN

git-cpan-module:   SOAP-WSDL
git-cpan-version:  2.00_27
git-cpan-authorid: MKUTTER
git-cpan-file:     authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00_27.tar.gz

lib/SOAP/WSDL/Expat/MessageParser.pm

@@ -48,7 +48,7 @@ sub load_classes {
 
         # a bad test - do you know a better one?
         next if $class eq '__SKIP__';
-        next if defined @{ "$class\::ISA"}; # check if namespace exists
+        next if defined *{ "$class\::" }; # check if namespace exists
 
         $class =~s{ :: }{/}xmsg;
         $class .= '.pm';
@@ -289,8 +289,8 @@ This module may be used under the same terms as perl itself.
 
  $ID: $
 
- $LastChangedDate: 2007-12-02 23:20:24 +0100 (So, 02 Dez 2007) $
- $LastChangedRevision: 427 $
+ $LastChangedDate: 2007-12-07 21:04:06 +0100 (Fr, 07 Dez 2007) $
+ $LastChangedRevision: 444 $
  $LastChangedBy: kutterma $
 
  $HeadURL: http://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Expat/MessageParser.pm $

lib/SOAP/WSDL/Expat/WSDLParser.pm

@@ -5,7 +5,7 @@ use Carp;
 use SOAP::WSDL::TypeLookup;
 use base qw(SOAP::WSDL::Expat::Base);
 
-our $VERSION = q{2.00_25};
+our $VERSION = q{2.00_27};
 
 sub _initialize {
     my ($self, $parser) = @_;
@@ -36,7 +36,9 @@ sub _initialize {
                 eval "require $action->{ class }";
                 croak $@ if ($@);
 
-                my $obj = $action->{ class }->new({ parent => $current })
+                my $obj = $action->{ class }->new({ parent => $current,
+                    xmlns => { '#default' => $parser->namespace($localname) }
+                    })
                   ->init( _fixup_attrs( $parser, %attrs ) );
 
                 if ($current) {