dinislage/SOAP-WSDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

import SOAP-WSDL 1.26 from CPAN

Browse Source 
git-cpan-module:   SOAP-WSDL
git-cpan-version:  1.26
git-cpan-authorid: MKUTTER
git-cpan-file:     authors/id/M/MK/MKUTTER/SOAP-WSDL-1.26.tar.gz
This commit is contained in:
Martin Kutter
2009-12-12 19:48:00 -08:00
committed by Michael G. Schwern
parent 30be0da3dc
commit c6a48ba84b
267 changed files with 2358 additions and 22430 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/SOAP/WSDL/Generator/Template/XSD/Interface/Header.tt
-28
View File
@@ -1,28 +0,0 @@
[%
RETURN IF NOT item;
message = definitions.find_message( item.expand( item.get_message ) );
PERL %]
my $message = $stash->{ message };
my $item = $stash->{ item };
my $def = $stash->{ definitions };
my $type_prefix = $stash->{ type_prefix };
my $element_prefix = $stash->{ element_prefix };
my ($ns, $lname) = $def->expand( $item->get_part() );
my ($part) = grep {
$_->get_name eq $lname
&& $_->get_targetNamespace eq $ns } @{ $message->get_part( ) };
my $part_class = do {
my $name;
($name = $part->get_element)
? "$element_prefix::$name"
: ($name = $part->get_type)
? "$type_prefix::$name"
: die "input must have either type or element";
};
$stash->{ part_class } = $part_class;
[% END;
%]
'use' => '[% item.get_use %]',
namespace => '[% item.get_namespace %]',
encodingStyle => '[% item.get_encodingStyle %]',
parts => '[qw( [% part_class %] )]',