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

import SOAP-WSDL 2.00.09 from CPAN

Browse Source 
git-cpan-module:   SOAP-WSDL
git-cpan-version:  2.00.09
git-cpan-authorid: MKUTTER
git-cpan-file:     authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00.09.tar.gz
This commit is contained in:
Martin Kutter
2009-12-12 19:49:02 -08:00
committed by Michael G. Schwern
parent fb9fd4a2b1
commit 3b30e8d0e2
161 changed files with 219 additions and 13984 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/SOAP/WSDL.pm
+3 -3
View File
@@ -14,7 +14,7 @@ use Class::Std::Fast constructor => 'none';
use SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType;
use LWP::UserAgent;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %no_dispatch_of :ATTR(:name<no_dispatch>);
my %wsdl_of :ATTR(:name<wsdl>);
@@ -831,9 +831,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: WSDL.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: WSDL.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL.pm $
=cut
lib/SOAP/WSDL/Base.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use List::Util;
use Scalar::Util;
use Carp qw(croak carp confess);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %id_of :ATTR(:name<id> :default<()>);
my %lang_of :ATTR(:name<lang> :default<()>);
lib/SOAP/WSDL/Binding.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %operation_of :ATTR(:name<operation> :default<()>);
my %type_of :ATTR(:name<type> :default<()>);
lib/SOAP/WSDL/Client.pm
+3 -3
View File
@@ -11,7 +11,7 @@ use SOAP::WSDL::Factory::Serializer;
use SOAP::WSDL::Factory::Transport;
use SOAP::WSDL::Expat::MessageParser;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %class_resolver_of :ATTR(:name<class_resolver> :default<()>);
my %no_dispatch_of :ATTR(:name<no_dispatch> :default<()>);
@@ -400,9 +400,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Client.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Client.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Client.pm $
=cut
lib/SOAP/WSDL/Client/Base.pm
+3 -3
View File
@@ -4,7 +4,7 @@ use warnings;
use base 'SOAP::WSDL::Client';
use Scalar::Util qw(blessed);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub call {
my ($self, $method, $body, $header) = @_;
@@ -85,9 +85,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Base.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Base.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Client/Base.pm $
=cut
lib/SOAP/WSDL/Definitions.pm
+3 -3
View File
@@ -5,7 +5,7 @@ use List::Util qw(first);
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %types_of :ATTR(:name<types> :default<[]>);
my %message_of :ATTR(:name<message> :default<[]>);
@@ -115,9 +115,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Definitions.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Definitions.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Definitions.pm $
=cut
lib/SOAP/WSDL/Deserializer/Hash.pm
+4 -4
View File
@@ -8,7 +8,7 @@ use SOAP::WSDL::Expat::Message2Hash;
use SOAP::WSDL::Factory::Deserializer;
SOAP::WSDL::Factory::Deserializer->register( '1.1', __PACKAGE__ );
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub BUILD {
my ($self, $ident, $args_of_ref) = @_;
@@ -38,7 +38,7 @@ sub deserialize {
sub generate_fault {
my ($self, $args_from_ref) = @_;
return SOAP::WSDL::SOAP::Typelib::Fault11->new({
faultcode => $args_from_ref->{ code } || 'soap:Client',
faultcode => $args_from_ref->{ code } || 'SOAP-ENV:Client',
faultactor => $args_from_ref->{ role } || 'urn:localhost',
faultstring => $args_from_ref->{ message } || "Unknown error"
});
@@ -163,9 +163,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Hash.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Hash.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Deserializer/Hash.pm $
=cut
lib/SOAP/WSDL/Deserializer/SOM.pm
+4 -4
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Deserializer::SOM;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
our @ISA;
eval {
@@ -18,7 +18,7 @@ sub deserialize {
my $result = eval { $self->SUPER::deserialize(@_) };
if ($@) {
return SOAP::Fault->new(
faultactor => 'soap:Server',
faultactor => 'SOAP-ENV:Server',
faultstring => $@,
);
}
@@ -140,9 +140,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: SOM.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: SOM.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Deserializer/SOM.pm $
=cut
lib/SOAP/WSDL/Deserializer/XSD.pm
+5 -5
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use SOAP::WSDL::SOAP::Typelib::Fault11;
use SOAP::WSDL::Expat::MessageParser;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %class_resolver_of :ATTR(:name<class_resolver> :default<()>);
my %strict_of :ATTR(:get<strict> :init_arg<strict> :default<1>);
@@ -38,7 +38,7 @@ sub deserialize {
eval { $parser_of{ ${ $self } }->parse_string( $content ) };
if ($@) {
return $self->generate_fault({
code => 'soap:Server',
code => 'SOAP-ENV:Server',
role => 'urn:localhost',
message => "Error deserializing message: $@. \n"
. "Message was: \n$content"
@@ -50,7 +50,7 @@ sub deserialize {
sub generate_fault {
my ($self, $args_from_ref) = @_;
return SOAP::WSDL::SOAP::Typelib::Fault11->new({
faultcode => $args_from_ref->{ code } || 'soap:Client',
faultcode => $args_from_ref->{ code } || 'SOAP-ENV:Client',
faultactor => $args_from_ref->{ role } || 'urn:localhost',
faultstring => $args_from_ref->{ message } || "Unknown error"
});
@@ -126,9 +126,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: XSD.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: XSD.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Deserializer/XSD.pm $
=cut
lib/SOAP/WSDL/Expat/Base.pm
+1 -1
View File
@@ -6,7 +6,7 @@ use XML::Parser::Expat;
# TODO: convert to Class::Std::Fast based class - hash based classes suck.
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub new {
my ($class, $arg_ref) = @_;
lib/SOAP/WSDL/Expat/Message2Hash.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use strict;
use warnings;
use base qw(SOAP::WSDL::Expat::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub _initialize {
my ($self, $parser) = @_;
lib/SOAP/WSDL/Expat/MessageParser.pm
+4 -4
View File
@@ -9,7 +9,7 @@ use base qw(SOAP::WSDL::Expat::Base);
BEGIN { require Class::Std::Fast };
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# GLOBALS
my $OBJECT_CACHE_REF = Class::Std::Fast::OBJECT_CACHE_REF();
@@ -330,10 +330,10 @@ the same terms as perl itself
=head1 Repository information
$Id: MessageParser.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: MessageParser.pm 805 2009-02-23 21:12:24Z kutterma $
$LastChangedDate: 2009-02-22 19:44:13 +0100 (So, 22 Feb 2009) $
$LastChangedRevision: 798 $
$LastChangedDate: 2009-02-23 22:12:24 +0100 (Mo, 23 Feb 2009) $
$LastChangedRevision: 805 $
$LastChangedBy: kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Expat/MessageParser.pm $
lib/SOAP/WSDL/Expat/MessageStreamParser.pm
+3 -3
View File
@@ -6,7 +6,7 @@ use XML::Parser::Expat;
use SOAP::WSDL::Expat::MessageParser;
use base qw(SOAP::WSDL::Expat::MessageParser);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub parse_start {
my $self = shift;
@@ -69,9 +69,9 @@ the same terms as perl itself
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: MessageStreamParser.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: MessageStreamParser.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Expat/MessageStreamParser.pm $
=cut
lib/SOAP/WSDL/Expat/WSDLParser.pm
+4 -4
View File
@@ -5,7 +5,7 @@ use Carp;
use SOAP::WSDL::TypeLookup;
use base qw(SOAP::WSDL::Expat::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#
# Import child elements of a WSDL / XML Schema tree into the current tree
@@ -367,10 +367,10 @@ the same terms as perl itself
=head1 Repository information
$Id: WSDLParser.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: WSDLParser.pm 805 2009-02-23 21:12:24Z kutterma $
$LastChangedDate: 2009-02-22 19:44:13 +0100 (So, 22 Feb 2009) $
$LastChangedRevision: 798 $
$LastChangedDate: 2009-02-23 22:12:24 +0100 (Mo, 23 Feb 2009) $
$LastChangedRevision: 805 $
$LastChangedBy: kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Expat/WSDLParser.pm $
lib/SOAP/WSDL/Factory/Deserializer.pm
+1 -1
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Factory::Deserializer;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %DESERIALIZER = (
'1.1' => 'SOAP::WSDL::Deserializer::XSD',
lib/SOAP/WSDL/Factory/Generator.pm
+1 -1
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Factory::Generator;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %GENERATOR = (
'XSD' => 'SOAP::WSDL::Generator::Template::XSD',
lib/SOAP/WSDL/Factory/Serializer.pm
+3 -3
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Factory::Serializer;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %SERIALIZER = (
'1.1' => 'SOAP::WSDL::Serializer::XSD',
@@ -138,9 +138,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Serializer.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Serializer.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Factory/Serializer.pm $
=cut
lib/SOAP/WSDL/Factory/Transport.pm
+3 -3
View File
@@ -1,7 +1,7 @@
package SOAP::WSDL::Factory::Transport;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %registered_transport_of = ();
@@ -243,9 +243,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Transport.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Transport.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Factory/Transport.pm $
=cut
lib/SOAP/WSDL/Generator/Iterator/WSDL11.pm
+1 -1
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Generator::Iterator::WSDL11;
use strict; use warnings;
use Class::Std::Fast;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %definitions_of :ATTR(:name<definitions> :default<[]>);
my %nodes_of :ATTR(:name<nodes> :default<[]>);
lib/SOAP/WSDL/Generator/PrefixResolver.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict; use warnings;
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %namespace_prefix_map_of :ATTR(:name<namespace_prefix_map> :default<{}>);
my %namespace_map_of :ATTR(:name<namespace_map> :default<{}>);
lib/SOAP/WSDL/Generator/Template.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use Carp;
use SOAP::WSDL::Generator::PrefixResolver;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %tt_of :ATTR(:get<tt>);
my %definitions_of :ATTR(:name<definitions> :default<()>);
lib/SOAP/WSDL/Generator/Template/Plugin/XSD.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Carp qw(confess);
use Class::Std::Fast::Storable constructor => 'none';
use Scalar::Util qw(blessed);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %namespace_prefix_map_of :ATTR(:name<namespace_prefix_map> :default<{}>);
my %namespace_map_of :ATTR(:name<namespace_map> :default<{}>);
lib/SOAP/WSDL/Generator/Template/XSD.pm
+2 -2
View File
@@ -1,11 +1,11 @@
package SOAP::WSDL::Generator::Template::XSD;
use strict; use warnings;
use Template;
use Template 2.18;
use Class::Std::Fast::Storable;
use File::Basename;
use File::Spec;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
use SOAP::WSDL::Generator::Visitor::Typemap;
use SOAP::WSDL::Generator::Template::Plugin::XSD;
lib/SOAP/WSDL/Generator/Visitor.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %definitions_of :ATTR(:name<definitions> :default<()>);
my %type_prefix_of :ATTR(:name<type_prefix> :default<()>);
lib/SOAP/WSDL/Generator/Visitor/Typemap.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Generator::Visitor);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %path_of :ATTR(:name<path> :default<[]>);
my %typemap_of :ATTR(:name<typemap> :default<()>);
lib/SOAP/WSDL/Message.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %part_of :ATTR(:name<part> :default<[]>);
lib/SOAP/WSDL/OpMessage.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %body_of :ATTR(:name<body> :default<[]>);
my %header_of :ATTR(:name<header> :default<[]>);
lib/SOAP/WSDL/Operation.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %operation_of :ATTR(:name<operation> :default<()>);
my %input_of :ATTR(:name<input> :default<[]>);
lib/SOAP/WSDL/Part.pm
+1 -1
View File
@@ -6,7 +6,7 @@ use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %element_of :ATTR(:name<element> :default<()>);
my %type_of :ATTR(:name<type> :default<()>);
lib/SOAP/WSDL/Port.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %binding_of :ATTR(:name<binding> :default<()>);
my %address_of :ATTR(:name<address> :default<()>);
lib/SOAP/WSDL/PortType.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use List::Util;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %operation_of :ATTR(:name<operation> :default<()>);
lib/SOAP/WSDL/SOAP/Address.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use base qw(SOAP::WSDL::Base);
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %location :ATTR(:name<location> :default<()>);
1;
lib/SOAP/WSDL/SOAP/Body.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use base qw(SOAP::WSDL::Base);
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %use_of :ATTR(:name<use> :default<q{}>);
my %namespace_of :ATTR(:name<namespace> :default<q{}>);
lib/SOAP/WSDL/SOAP/Header.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use base qw(SOAP::WSDL::Base);
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %use_of :ATTR(:name<use> :default<q{}>);
my %namespace_of :ATTR(:name<namespace> :default<q{}>);
lib/SOAP/WSDL/SOAP/HeaderFault.pm
+1 -1
View File
@@ -3,6 +3,6 @@ use strict;
use warnings;
use base qw(SOAP::WSDL::Header);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
1;
lib/SOAP/WSDL/SOAP/Operation.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %style_of :ATTR(:name<style> :default<()>);
my %soapAction_of :ATTR(:name<soapAction> :default<()>);
lib/SOAP/WSDL/SOAP/Typelib/Fault11.pm
+3 -3
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
use SOAP::WSDL::XSD::Typelib::ComplexType;
use SOAP::WSDL::XSD::Typelib::Element;
@@ -101,9 +101,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Fault11.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Fault11.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/SOAP/Typelib/Fault11.pm $
=cut
lib/SOAP/WSDL/Serializer/XSD.pm
+3 -3
View File
@@ -5,7 +5,7 @@ use warnings;
use Class::Std::Fast::Storable;
use Scalar::Util qw(blessed);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
use SOAP::WSDL::Factory::Serializer;
@@ -132,9 +132,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: XSD.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: XSD.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Serializer/XSD.pm $
=cut
lib/SOAP/WSDL/Server.pm
+1 -1
View File
@@ -6,7 +6,7 @@ use Scalar::Util qw(blessed);
use SOAP::WSDL::Factory::Deserializer;
use SOAP::WSDL::Factory::Serializer;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %dispatch_to_of :ATTR(:name<dispatch_to> :default<()>);
my %action_map_ref_of :ATTR(:name<action_map_ref> :default<{}>);
lib/SOAP/WSDL/Server/CGI.pm
+1 -1
View File
@@ -14,7 +14,7 @@ use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Server);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# mostly copied from SOAP::Lite. Unfortunately we can't use SOAP::Lite's CGI
# server directly - we would have to swap out it's base class...
lib/SOAP/WSDL/Server/Mod_Perl2.pm
+1 -1
View File
@@ -16,7 +16,7 @@ use Apache2::Const -compile => qw(
HTTP_LENGTH_REQUIRED
);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %LOADED_OF = ();
lib/SOAP/WSDL/Server/Simple.pm
+1 -1
View File
@@ -14,7 +14,7 @@ use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Server);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# mostly copied from SOAP::Lite. Unfortunately we can't use SOAP::Lite's CGI
# server directly - we would have to swap out it's base class...
lib/SOAP/WSDL/Service.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %port_of :ATTR(:name<port> :default<[]>);
lib/SOAP/WSDL/Transport/HTTP.pm
+3 -3
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::Transport::HTTP;
use strict; use warnings;
use base qw(LWP::UserAgent);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# create methods normally inherited from SOAP::Client
SUBFACTORY: {
@@ -95,9 +95,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: HTTP.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: HTTP.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/Transport/HTTP.pm $
=cut
lib/SOAP/WSDL/Transport/Loopback.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'basic';
use SOAP::WSDL::Factory::Transport;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# register on loading
SOAP::WSDL::Factory::Transport->register( http => __PACKAGE__ );
lib/SOAP/WSDL/Transport/Test.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use SOAP::WSDL::Factory::Transport;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
SOAP::WSDL::Factory::Transport->register( http => __PACKAGE__ );
SOAP::WSDL::Factory::Transport->register( https => __PACKAGE__ );
lib/SOAP/WSDL/TypeLookup.pm
+1 -1
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::TypeLookup;
use strict;
use warnings;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %TYPE_FROM = (
# wsdl:
lib/SOAP/WSDL/Types.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use SOAP::WSDL::XSD::Schema::Builtin;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %schema_of :ATTR(:name<schema> :default<[]>);
lib/SOAP/WSDL/XSD/Annotation.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<enumeration value="">
lib/SOAP/WSDL/XSD/Attribute.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<attribute
# default = string
lib/SOAP/WSDL/XSD/AttributeGroup.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<attributeGroup
# id = ID
lib/SOAP/WSDL/XSD/Builtin.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# only used in SOAP::WSDL - will be obsolete once SOAP::WSDL uses the
# generative approach, too
lib/SOAP/WSDL/XSD/ComplexType.pm
+1 -1
View File
@@ -5,7 +5,7 @@ use Class::Std::Fast::Storable;
use Scalar::Util qw(blessed);
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# id provided by Base
# name provided by Base
lib/SOAP/WSDL/XSD/Element.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# id provided by Base
# name provided by Base
lib/SOAP/WSDL/XSD/Enumeration.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<enumeration value="">
lib/SOAP/WSDL/XSD/FractionDigits.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<pattern value="">
# id provided by Base
lib/SOAP/WSDL/XSD/Group.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<xs:group name="myModelGroup">
# <xs:sequence>
lib/SOAP/WSDL/XSD/Length.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/MaxExclusive.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/MaxInclusive.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/MaxLength.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<maxLength value="">
lib/SOAP/WSDL/XSD/MinExclusive.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/MinInclusive.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/MinLength.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<minExclusive value="">
lib/SOAP/WSDL/XSD/Pattern.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<pattern value="">
lib/SOAP/WSDL/XSD/Schema.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# child elements
my %attributeGroup_of :ATTR(:name<attributeGroup> :default<[]>);
lib/SOAP/WSDL/XSD/Schema/Builtin.pm
+3 -3
View File
@@ -6,7 +6,7 @@ use SOAP::WSDL::XSD::Schema;
use SOAP::WSDL::XSD::Builtin;
use base qw(SOAP::WSDL::XSD::Schema);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# all builtin types - add validation (e.g. content restrictions) later...
my %BUILTINS = (
@@ -103,9 +103,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Builtin.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Builtin.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/XSD/Schema/Builtin.pm $
=cut
lib/SOAP/WSDL/XSD/SimpleType.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %length_of :ATTR(:name<length> :default<[]>);
my %minLength_of :ATTR(:name<minLength> :default<[]>);
lib/SOAP/WSDL/XSD/TotalDigits.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<totalDigits value="">
lib/SOAP/WSDL/XSD/Typelib/Attribute.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use base qw(SOAP::WSDL::XSD::Typelib::Element);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub start_tag {
# my ($self, $opt, $value) = @_;
lib/SOAP/WSDL/XSD/Typelib/AttributeSet.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub serialize {
# we work on @_ for performance.
lib/SOAP/WSDL/XSD/Typelib/Builtin.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use Class::Std::Fast::Storable;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
use SOAP::WSDL::XSD::Typelib::Builtin::anyType;
use SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType;
lib/SOAP/WSDL/XSD/Typelib/Builtin/anyType.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub get_xmlns { 'http://www.w3.org/2001/XMLSchema' };
lib/SOAP/WSDL/XSD/Typelib/Builtin/boolean.pm
+1 -1
View File
@@ -3,7 +3,7 @@ use strict;
use warnings;
use Class::Std::Fast::Storable constructor => 'none', cache => 1;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
use base qw(SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType);
lib/SOAP/WSDL/XSD/Typelib/Builtin/time.pm
+1 -1
View File
@@ -6,7 +6,7 @@ use Date::Format;
use Class::Std::Fast::Storable constructor => 'none', cache => 1;
use base qw(SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
sub set_value {
# use set_value from base class if we have a XML-Time format
lib/SOAP/WSDL/XSD/Typelib/ComplexType.pm
+4 -4
View File
@@ -10,7 +10,7 @@ require Class::Std::Fast::Storable;
use base qw(SOAP::WSDL::XSD::Typelib::Builtin::anyType);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
# remove in 2.1
our $AS_HASH_REF_WITHOUT_ATTRIBUTES = 0;
@@ -327,7 +327,7 @@ sub _factory {
# do we have some content
if (defined $element) {
$element = [ $element ] if not ref $element eq 'ARRAY';
# from 2.00.08 on $NAMES_OF is filled - use || $_; for
# from 2.00.09 on $NAMES_OF is filled - use || $_; for
# backward compatibility
my $name = $NAMES_OF{$class}->{$_} || $_;
my $target_namespace = $_[0]->get_xmlns();
@@ -633,9 +633,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: ComplexType.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: ComplexType.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/XSD/Typelib/ComplexType.pm $
=cut
lib/SOAP/WSDL/XSD/Typelib/Element.pm
+3 -3
View File
@@ -2,7 +2,7 @@ package SOAP::WSDL::XSD::Typelib::Element;
use strict; use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
my %NAME;
my %NILLABLE;
@@ -177,9 +177,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: Element.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: Element.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/XSD/Typelib/Element.pm $
=cut
lib/SOAP/WSDL/XSD/Typelib/SimpleType.pm
+4 -4
View File
@@ -2,14 +2,14 @@ package SOAP::WSDL::XSD::Typelib::SimpleType;
use strict; use warnings;
use SOAP::WSDL::XSD::Typelib::Builtin;
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
package SOAP::WSDL::XSD::Typelib::SimpleType::restriction;
use strict;
use SOAP::WSDL::XSD::Typelib::Builtin;
use base qw(SOAP::WSDL::XSD::Typelib::SimpleType);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
1;
__END__
@@ -132,9 +132,9 @@ Martin Kutter E<lt>martin.kutter fen-net.deE<gt>
=head1 REPOSITORY INFORMATION
$Rev: 798 $
$Rev: 805 $
$LastChangedBy: kutterma $
$Id: SimpleType.pm 798 2009-02-22 18:44:13Z kutterma $
$Id: SimpleType.pm 805 2009-02-23 21:12:24Z kutterma $
$HeadURL: https://soap-wsdl.svn.sourceforge.net/svnroot/soap-wsdl/SOAP-WSDL/trunk/lib/SOAP/WSDL/XSD/Typelib/SimpleType.pm $
=cut
lib/SOAP/WSDL/XSD/WhiteSpace.pm
+1 -1
View File
@@ -4,7 +4,7 @@ use warnings;
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::Base);
use version; our $VERSION = qv('2.00.08');
use version; our $VERSION = qv('2.00.09');
#<pattern value="">