Skip Menu |
 

This queue is for tickets about the SOAP-WSDL CPAN distribution.

Report information
The Basics
Id: 40658
Status: resolved
Priority: 0/
Queue: SOAP-WSDL

People
Owner: Nobody in particular
Requestors: ian.sillitoe [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 2.00.05
Fixed in: (no value)



Subject: wsdl2perl - prefix option
Download (untitled) / with headers
text/plain 1.1k
Hi, Thanks for all your work on this resource. I've attached a minor patch that I applied to wsdl2perl.pl that you might be interested in. Essentially this resolves the --prefix option in the way that I *think* was originally intended (the option is documented in the POD usage but doesn't appear to be implemented). Cheers, Ian wsdl2perl.pl project.wsdl 'element_prefix' => 'MyElements' 'attribute_prefix' => 'MyAttributes' 'typemap_prefix' => 'MyTypemaps' 'type_prefix' => 'MyTypes' 'interface_prefix' => 'MyInterfaces' 'server_prefix' => 'MyServer' wsdl2perl.pl -prefix 'Project' project.wsdl 'element_prefix' => 'ProjectElements' 'attribute_prefix' => 'ProjectAttributes' 'typemap_prefix' => 'ProjectTypemaps' 'type_prefix' => 'ProjectTypes' 'interface_prefix' => 'ProjectInterfaces' 'server_prefix' => 'ProjectServer' wsdl2perl.pl -prefix 'Project' -element_prefix 'CustomElements' project.wsdl 'element_prefix' => 'CustomElements' 'attribute_prefix' => 'ProjectAttributes' 'typemap_prefix' => 'ProjectTypemaps' 'type_prefix' => 'ProjectTypes' 'interface_prefix' => 'ProjectInterfaces' 'server_prefix' => 'ProjectServer'
Subject: wsdl2perl.patch
Download wsdl2perl.patch
text/x-diff 1013b
13,19c13,19 < prefix => 'My', < attribute_prefix => undef, < type_prefix => undef, < element_prefix => undef, < typemap_prefix => undef, < interface_prefix => undef, < server_prefix => undef, --- > prefix => undef, > attribute_prefix => 'MyAttributes', > type_prefix => 'MyTypes', > element_prefix => 'MyElements', > typemap_prefix => 'MyTypemaps', > interface_prefix => 'MyInterfaces', > server_prefix => 'MyServer', 94,107d93 < # resolve the default prefix options < map { < my $opt_key = $_; < if ( $opt_key =~ / (\w+) _prefix $/xms # relevant option < && !$opt{ $opt_key } # that hasn't already been explicitly set < ) < { < my $prefix_type = $1; < $opt{ $opt_key } = $opt{prefix} . # My < ucfirst( $prefix_type ) . # Typemap < ( $prefix_type eq 'server' ? '' : 's' ); # s < } < } keys %opt; <
Subject: Re: [rt.cpan.org #40658] wsdl2perl - prefix option
Date: Wed, 03 Dec 2008 22:40:06 +0100
To: bug-SOAP-WSDL [...] rt.cpan.org
From: Martin Kutter <martin.kutter [...] fen-net.de>
Download (untitled) / with headers
text/plain 1.9k
Hi Ian, actually, the --prefix was an old option for setting both the types and elements prefix to the same value - but I like your interpretation better :-) Included in 2.00.06 just uploaded to CPAN Thanks, Martin Am Dienstag, den 04.11.2008, 09:43 -0500 schrieb Ian Sillitoe via RT: Show quoted text
> Tue Nov 04 09:43:14 2008: Request 40658 was acted upon. > Transaction: Ticket created by isillitoe > Queue: SOAP-WSDL > Subject: wsdl2perl - prefix option > Broken in: 2.00.05 > Severity: Normal > Owner: Nobody > Requestors: ian.sillitoe@gmail.com > Status: new > Ticket <URL: http://rt.cpan.org/Ticket/Display.html?id=40658 > > > > Hi, > > Thanks for all your work on this resource. > > I've attached a minor patch that I applied to wsdl2perl.pl that you > might be interested in. Essentially this resolves the --prefix option in > the way that I *think* was originally intended (the option is documented > in the POD usage but doesn't appear to be implemented). > > Cheers, > > Ian > > > > wsdl2perl.pl project.wsdl > > 'element_prefix' => 'MyElements' > 'attribute_prefix' => 'MyAttributes' > 'typemap_prefix' => 'MyTypemaps' > 'type_prefix' => 'MyTypes' > 'interface_prefix' => 'MyInterfaces' > 'server_prefix' => 'MyServer' > > wsdl2perl.pl -prefix 'Project' project.wsdl > > 'element_prefix' => 'ProjectElements' > 'attribute_prefix' => 'ProjectAttributes' > 'typemap_prefix' => 'ProjectTypemaps' > 'type_prefix' => 'ProjectTypes' > 'interface_prefix' => 'ProjectInterfaces' > 'server_prefix' => 'ProjectServer' > > wsdl2perl.pl -prefix 'Project' -element_prefix 'CustomElements' project.wsdl > > 'element_prefix' => 'CustomElements' > 'attribute_prefix' => 'ProjectAttributes' > 'typemap_prefix' => 'ProjectTypemaps' > 'type_prefix' => 'ProjectTypes' > 'interface_prefix' => 'ProjectInterfaces' > 'server_prefix' => 'ProjectServer' > >


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.