import SOAP-WSDL 2.00_13 from CPAN

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

lib/SOAP/WSDL/Port.pm

@@ -10,14 +10,14 @@ my %location_of :ATTR(:name<location> :default<()>);
 sub explain {
 
     my $self = shift;
-    my $opt = shift;
-    $opt->{ wsdl } || die 'required attribute wsdl missing'; 
-
+    my $opt = shift;
+    $opt->{ wsdl } || die 'required attribute wsdl missing'; 
+
     my $binding = $opt->{ wsdl }->find_binding(
         $opt->{ wsdl }->_expand( $self->get_binding() )
     ) or die 'binding ' . $self->get_binding()  . ' not found !';
-
-
+
+
     my $txt = "=head2 Service information:\n\n"
         . " Port name: " . $self->get_name() . "\n"
         . " Binding: " . $self->get_binding() ."\n"
@@ -30,10 +30,10 @@ sub explain {
 sub to_typemap {
     my $self = shift;
     my $opt = shift;
-
-    # skip non-SOAP ports (could be http, email or whatever...)
-    return q{} if not $location_of{ ident $self };
-
+
+    # skip non-SOAP ports (could be http, email or whatever...)
+    return q{} if not $location_of{ ident $self };
+
     my $binding = $opt->{ wsdl }->find_binding(
         $opt->{wsdl}->_expand( $binding_of{ ident $self } )
     ) or die 'binding ' . $binding_of{ ident $self } .' not found!';