[Xml-compile] ONVIF wsdl and XML::Compile::WSDL11

[Mark Overmeer]

* Sandro Magrí (sandro at freenetst.it) [160208 01:24]:
> In XML::Compile::WSDL11, sub operation, around line 282:
> 
> $ diff WSDL11.pm  WSDL11.pm_orig
> 282,283d281
> <     $prefix = $prefix."12"; # dirty trick for soap12

I did not remember, but ::WSDL11 supports WSDLs which do not have
a service block.  Only... it was not prepared for SOAP12-only
wsdls.  I will include this change in release 3.05:

Around line 209:

 -      my %port = (name => $portname, binding => $binding
 -         , soap_address => {location => 'http://localhost'} );

 +      my $addr
 +        = $bindings[0]->{soap_binding}   ? 'soap_address'
 +        : $bindings[0]->{soap12_binding} ? 'soap12_address'
 +        : error __x"unrecognized binding type for wsdl without service block";

 +      my %port = (name => $portname, binding => $binding
 +         , $addr => {location => 'http://localhost'} );

-- 
Regards,
               MarkOv

------------------------------------------------------------------------
       Mark Overmeer MSc                                MARKOV Solutions
       Mark at Overmeer.net                          solutions at overmeer.net
http://Mark.Overmeer.net                   http://solutions.overmeer.net