[libsoap-lite-perl] 01/05: New upstream version 1.22

Xavier Guimard xguimard-guest at moszumanska.debian.org
Wed Sep 13 14:04:48 UTC 2017


This is an automated email from the git hooks/post-receive script.

xguimard-guest pushed a commit to branch master
in repository libsoap-lite-perl.

commit 6b3b571ef61bc29062a5ecbadd995252ee59e0b1
Author: Xavier Guimard <x.guimard at free.fr>
Date:   Wed Sep 13 16:00:02 2017 +0200

    New upstream version 1.22
---
 Changes                                         | 12 ++++++++++++
 MANIFEST                                        |  5 +++--
 META.json                                       | 18 ++++++++++++------
 META.yml                                        | 13 +++++++++----
 Makefile.PL                                     | 11 ++++++-----
 README                                          |  6 +++---
 bin/SOAPsh.pl                                   |  2 +-
 dist.ini                                        | 13 +++++++++----
 lib/SOAP/Lite.pm                                |  5 +++--
 lib/SOAP/Packager.pm                            |  6 +++---
 lib/SOAP/Test.pm                                |  3 ++-
 lib/SOAP/Transport/HTTP.pm                      |  5 +++++
 lib/SOAP/Transport/TCP.pm                       |  5 +++--
 t/01-core.t                                     |  2 +-
 t/02-payload.t                                  |  2 +-
 t/03-server.t                                   |  2 +-
 t/04-attach.t                                   |  2 +-
 t/05-customxml.t                                |  2 +-
 t/06-modules.t                                  |  2 +-
 t/08-schema.t                                   |  2 +-
 t/11-cgi.t                                      |  2 +-
 t/12-cgi_https.t                                |  2 +-
 t/13-mod_perl.t                                 |  2 +-
 t/14-cgi_apache.t                               |  2 +-
 t/15-daemon.t                                   |  2 +-
 t/17-mod_soap.t                                 |  2 +-
 t/19-apachesoap.t                               |  2 +-
 t/21-public.t                                   |  2 +-
 t/22-interop_apache.t                           |  2 +-
 t/23-ppm.t                                      |  2 +-
 t/24-wsdl.t                                     |  2 +-
 t/Issues/rt107924.t                             | 16 ++++++++++++++++
 t/SOAP/Transport/HTTP/CGI.t                     |  5 ++++-
 t/{release-pod-syntax.t => author-pod-syntax.t} |  7 ++++---
 t/release-kwalitee.t                            | 16 +++++++++-------
 35 files changed, 122 insertions(+), 62 deletions(-)

diff --git a/Changes b/Changes
index c06e37b..b2f912b 100644
--- a/Changes
+++ b/Changes
@@ -15,6 +15,18 @@ http://rt.cpan.org/Public/Dist/Display.html?Name=SOAP-Lite
 THIS RELEASE
 -----------------------------------------------------------------------
 
+1.22 August 15, 2017
+    ! Noindex URI::tcp module [github/JaSei]
+    ! Correct the soap namespace declaration when calling services defined in WSDL [github/waaeer]
+    ! Fix typos [github/kmhl]
+
+1.21 November 6, 2016
+    ! #118654 consistently use '#!/usr/bin/env perl' throughout (@mototimo) [github/moto-timo]
+
+1.20 June 9, 2016
+    ! Minor kwalitee updates (@oeuftete)
+    ! #106688 encode utf8 content in test which fails under RHES 6.6
+
 1.19 August 26, 2015
     ! #106665 Correct the version manually, no autoversioning, and the maintainer screwed up
 
diff --git a/MANIFEST b/MANIFEST
index 5053770..8cfb077 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.039.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.010.
 Changes
 Debian_CPANTS.txt
 HACKING
@@ -172,6 +172,7 @@ t/36-leaks.t
 t/38-packager.t
 t/40-loopback.t
 t/Issues/recursion.pl
+t/Issues/rt107924.t
 t/Issues/rt15176.t
 t/Issues/rt53375.t
 t/Issues/rt70329.t
@@ -202,5 +203,5 @@ t/SOAP/Transport/LOOPBACK.t
 t/SOAP/Transport/MAILTO.t
 t/SOAP/Transport/POP3.t
 t/SOAP/Transport/TCP.t
+t/author-pod-syntax.t
 t/release-kwalitee.t
-t/release-pod-syntax.t
diff --git a/META.json b/META.json
index f062374..0e4005d 100644
--- a/META.json
+++ b/META.json
@@ -8,7 +8,7 @@
       "Fred Moyer"
    ],
    "dynamic_config" : 0,
-   "generated_by" : "Dist::Zilla version 5.039, CPAN::Meta::Converter version 2.150005",
+   "generated_by" : "Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.143240",
    "license" : [
       "perl_5"
    ],
@@ -17,6 +17,11 @@
       "version" : 2
    },
    "name" : "SOAP-Lite",
+   "no_index" : {
+      "package" : [
+         "URI::tcp"
+      ]
+   },
    "prereqs" : {
       "configure" : {
          "requires" : {
@@ -25,7 +30,6 @@
       },
       "develop" : {
          "requires" : {
-            "Test::Kwalitee" : "1.21",
             "Test::Pod" : "1.41"
          }
       },
@@ -51,7 +55,8 @@
             "Task::Weaken" : "0",
             "URI" : "0",
             "XML::Parser" : "2.23",
-            "constant" : "0"
+            "constant" : "0",
+            "perl" : "v5.6.0"
          },
          "suggests" : {
             "SOAP::Transport::JABBER" : "0.712",
@@ -68,7 +73,7 @@
             "IO::File" : "0",
             "Test::More" : "0",
             "Test::Warn" : "0",
-            "XML::Parser::Lite" : "0"
+            "XML::Parser::Lite" : "0.715"
          }
       }
    },
@@ -80,10 +85,11 @@
       },
       "repository" : {
          "type" : "git",
-         "url" : "ssh://git@github.com:redhotpenguin/soaplite.git",
+         "url" : "https://github.com/redhotpenguin/soaplite.git",
          "web" : "https://github.com/redhotpenguin/soaplite"
       }
    },
-   "version" : "1.19"
+   "version" : "1.22",
+   "x_serialization_backend" : "Cpanel::JSON::XS version 3.0237"
 }
 
diff --git a/META.yml b/META.yml
index 1a0da8a..f4126dd 100644
--- a/META.yml
+++ b/META.yml
@@ -10,16 +10,19 @@ build_requires:
   IO::File: '0'
   Test::More: '0'
   Test::Warn: '0'
-  XML::Parser::Lite: '0'
+  XML::Parser::Lite: '0.715'
 configure_requires:
   ExtUtils::MakeMaker: '0'
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 5.039, CPAN::Meta::Converter version 2.150005'
+generated_by: 'Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.143240'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
   version: '1.4'
 name: SOAP-Lite
+no_index:
+  package:
+    - URI::tcp
 recommends:
   Apache: '0'
   DIME::Tools: '0.03'
@@ -41,7 +44,9 @@ requires:
   URI: '0'
   XML::Parser: '2.23'
   constant: '0'
+  perl: v5.6.0
 resources:
   bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=SOAP-Lite
-  repository: ssh://git@github.com:redhotpenguin/soaplite.git
-version: '1.19'
+  repository: https://github.com/redhotpenguin/soaplite.git
+version: '1.22'
+x_serialization_backend: 'YAML::Tiny version 1.70'
diff --git a/Makefile.PL b/Makefile.PL
index ba8f396..c272cf7 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,8 +1,8 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.039.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.010.
 use strict;
 use warnings;
 
-
+use 5.006000;
 
 use ExtUtils::MakeMaker;
 
@@ -18,6 +18,7 @@ my %WriteMakefileArgs = (
     "bin/stubmaker.pl"
   ],
   "LICENSE" => "perl",
+  "MIN_PERL_VERSION" => "5.006000",
   "NAME" => "SOAP::Lite",
   "PREREQ_PM" => {
     "Class::Inspector" => 0,
@@ -37,9 +38,9 @@ my %WriteMakefileArgs = (
     "IO::File" => 0,
     "Test::More" => 0,
     "Test::Warn" => 0,
-    "XML::Parser::Lite" => 0
+    "XML::Parser::Lite" => "0.715"
   },
-  "VERSION" => "1.19",
+  "VERSION" => "1.22",
   "test" => {
     "TESTS" => "t/*.t t/Issues/*.t t/SOAP/*.t t/SOAP/Lite/*.t t/SOAP/Lite/Deserializer/*.t t/SOAP/Schema/*.t t/SOAP/Transport/*.t t/SOAP/Transport/HTTP/*.t"
   }
@@ -61,7 +62,7 @@ my %FallbackPrereqs = (
   "Test::Warn" => 0,
   "URI" => 0,
   "XML::Parser" => "2.23",
-  "XML::Parser::Lite" => 0,
+  "XML::Parser::Lite" => "0.715",
   "constant" => 0
 );
 
diff --git a/README b/README
index 19b39b8..a6bf8af 100644
--- a/README
+++ b/README
@@ -1212,7 +1212,7 @@ FEATURES
     For more information see COMPRESSION in HTTP::Transport.
 
 SECURITY
-    For security reasons, the exisiting path for Perl modules (@INC) will be
+    For security reasons, the existing path for Perl modules (@INC) will be
     disabled once you have chosen dynamic deployment and specified your own
     "PATH/". If you wish to access other modules in your included package
     you have several options:
@@ -1252,7 +1252,7 @@ INTEROPERABILITY
                        ->uri($MY_NAMESPACE)
                        ->value($output);
 
-    In addition see comment about default incoding in .NET Web Services
+    In addition see comment about default encoding in .NET Web Services
     below.
 
   SOAP::Lite client with a .NET server
@@ -1321,7 +1321,7 @@ INTEROPERABILITY
                            ->use_prefix(0)
                            ->myMethod();
 
-        Will result in the following XML, which is more pallatable by .NET:
+        Will result in the following XML, which is more palatable by .NET:
 
           <SOAP-ENV:Envelope ...attributes skipped>
             <SOAP-ENV:Body>
diff --git a/bin/SOAPsh.pl b/bin/SOAPsh.pl
index 888a34f..9c9f778 100644
--- a/bin/SOAPsh.pl
+++ b/bin/SOAPsh.pl
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 #!d:\perl\bin\perl.exe
 
 # -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko --
diff --git a/dist.ini b/dist.ini
index 8cdb83f..12af5bc 100644
--- a/dist.ini
+++ b/dist.ini
@@ -1,5 +1,5 @@
 name    = SOAP-Lite
-version = 1.19
+version = 1.22
 author  = Pavel Kulchenko
 author  = Randy J Ray
 author  = Byrne Reese
@@ -35,7 +35,7 @@ dir = bin
 [MetaResources]
 bugtracker.web    = https://rt.cpan.org/Public/Dist/Display.html?Name=SOAP-Lite
 bugtracker.mailto = bug-SOAP-Lite at rt.cpan.org
-repository.url    = ssh://git@github.com:redhotpenguin/soaplite.git
+repository.url    = https://github.com/redhotpenguin/soaplite.git
 repository.web    = https://github.com/redhotpenguin/soaplite
 repository.type   = git
 
@@ -43,9 +43,12 @@ repository.type   = git
 
 [PodSyntaxTests]
 
-[Test::Kwalitee]
+[Test::Kwalitee::Extra]
+arg = !use_warnings
+arg = !prereq_matches_use
 
 [Prereqs]
+perl                 = 5.6.0
 XML::Parser          = 2.23
 MIME::Base64         = 0
 URI                  = 0
@@ -76,7 +79,7 @@ SOAP::Transport::JABBER = 0.712     ; for examples
 IO::File = 0
 Test::More = 0
 Test::Warn = 0
-XML::Parser::Lite = 0
+XML::Parser::Lite = 0.715
 
 [Prereqs / TestRecommends]
 IO::Scalar = 2.105
@@ -87,3 +90,5 @@ Test::XML = 0
 [ConfirmRelease]
 [UploadToCPAN]
 
+[MetaNoIndex]
+package = URI::tcp
diff --git a/lib/SOAP/Lite.pm b/lib/SOAP/Lite.pm
index ccfa3e5..0dcf3de 100644
--- a/lib/SOAP/Lite.pm
+++ b/lib/SOAP/Lite.pm
@@ -17,7 +17,7 @@ package SOAP::Lite;
 use strict;
 use warnings;
 
-our $VERSION = '1.19';
+our $VERSION = '1.22';
 
 package SOAP::XMLSchemaApacheSOAP::Deserializer;
 
@@ -3412,6 +3412,7 @@ EOP
     my $namespaces = $self->deserializer->ids->[1];
     foreach my $key (keys %{$namespaces}) {
         my ($ns,$prefix) = SOAP::Utils::splitqname($key);
+        next if $namespaces->{$key} eq 'http://schemas.xmlsoap.org/wsdl/soap/';
         $self->{'_stub'} .= '  $self->serializer->register_ns("'.$namespaces->{$key}.'","'.$prefix.'");'."\n"
             if (defined $ns && ($ns eq "xmlns"));
     }
@@ -4127,7 +4128,7 @@ the specified WSDL schema and uses it as the basis for generating stubs.
 When set to a true value, the raw XML is returned by the call to a remote
 method.
 
-The default is to return the a L<SOAP::SOM> object (false).
+The default is to return a L<SOAP::SOM> object (false).
 
 =item autotype(boolean)
 
diff --git a/lib/SOAP/Packager.pm b/lib/SOAP/Packager.pm
index 2b1a3e0..18cae22 100644
--- a/lib/SOAP/Packager.pm
+++ b/lib/SOAP/Packager.pm
@@ -481,14 +481,14 @@ SOAP::Lite client.
     Path        => "attachment.txt",
     Filename    => "attachment.txt",
     Disposition => "attachment";
-  $NS = "urn:Majordojo:TemperatureService";
-  $HOST = "http://localhost/cgi-bin/soaplite.cgi";
+  my $NS = "urn:Majordojo:TemperatureService";
+  my $HOST = "http://localhost/cgi-bin/soaplite.cgi";
   my $client = SOAP::Lite
     ->packager(SOAP::Packager::MIME->new)
     ->parts([ $ent ])
     ->uri($NS)
     ->proxy($HOST);
-  $response = $client->c2f(SOAP::Data->name("temperature" => '100'));
+  my $response = $client->c2f(SOAP::Data->name("temperature" => '100'));
   print $response->valueof('//c2fResponse/foo');
 
 =head3 SERVER SIDE EXAMPLE
diff --git a/lib/SOAP/Test.pm b/lib/SOAP/Test.pm
index 7824a4e..7316170 100644
--- a/lib/SOAP/Test.pm
+++ b/lib/SOAP/Test.pm
@@ -15,7 +15,8 @@ our $TIMEOUT = 5;
 
 # ======================================================================
 
-package My::PingPong; # we'll use this package in our tests
+package # hide from PAUSE
+    My::PingPong; # we'll use this package in our tests
 
 sub new {
   my $self = shift;
diff --git a/lib/SOAP/Transport/HTTP.pm b/lib/SOAP/Transport/HTTP.pm
index 8f17c93..df71c9d 100644
--- a/lib/SOAP/Transport/HTTP.pm
+++ b/lib/SOAP/Transport/HTTP.pm
@@ -124,6 +124,11 @@ sub new {
 
     while (@methods) {
         my ( $method, $params ) = splice( @methods, 0, 2 );
+        # ssl_opts takes a hash, not a ref - see RT 107924
+        if (ref $params eq 'HASH' && $method eq 'ssl_opts') {
+            $self->$method( %$params );
+            next;
+        }
         $self->$method( ref $params eq 'ARRAY' ? @$params : $params );
     }
 
diff --git a/lib/SOAP/Transport/TCP.pm b/lib/SOAP/Transport/TCP.pm
index 643468c..9c88309 100644
--- a/lib/SOAP/Transport/TCP.pm
+++ b/lib/SOAP/Transport/TCP.pm
@@ -21,7 +21,8 @@ use IO::SessionData;
 
 # ======================================================================
 
-package URI::tcp; # ok, let's do 'tcp://' scheme
+package # hide from PAUSE
+    URI::tcp; # ok, let's do 'tcp://' scheme
 
 our $VERSION = 0.715;
 
@@ -309,4 +310,4 @@ Written by Paul Kulchenko.
 
 Split from SOAP::Lite and SOAP-Transport-TCP packaging by Martin Kutter
 
-=cut
\ No newline at end of file
+=cut
diff --git a/t/01-core.t b/t/01-core.t
index 084a20a..99755f8 100644
--- a/t/01-core.t
+++ b/t/01-core.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/02-payload.t b/t/02-payload.t
index b7fbab7..48b56cf 100644
--- a/t/02-payload.t
+++ b/t/02-payload.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/03-server.t b/t/03-server.t
index 85020a3..56c3fb4 100644
--- a/t/03-server.t
+++ b/t/03-server.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
     unless(grep /blib/, @INC) {
diff --git a/t/04-attach.t b/t/04-attach.t
index e4e3fe0..8388eee 100644
--- a/t/04-attach.t
+++ b/t/04-attach.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
     unless ( grep /blib/, @INC ) {
diff --git a/t/05-customxml.t b/t/05-customxml.t
index 4ef59be..c7eafd4 100644
--- a/t/05-customxml.t
+++ b/t/05-customxml.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/06-modules.t b/t/06-modules.t
index c757e13..0764c6b 100644
--- a/t/06-modules.t
+++ b/t/06-modules.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
 unless(grep /blib/, @INC) {
diff --git a/t/08-schema.t b/t/08-schema.t
index 0d8cd57..66e956d 100644
--- a/t/08-schema.t
+++ b/t/08-schema.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/11-cgi.t b/t/11-cgi.t
index b182336..dc2711f 100644
--- a/t/11-cgi.t
+++ b/t/11-cgi.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/12-cgi_https.t b/t/12-cgi_https.t
index 994ee97..6fd9737 100644
--- a/t/12-cgi_https.t
+++ b/t/12-cgi_https.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/13-mod_perl.t b/t/13-mod_perl.t
index 33cd90b..a790bdc 100644
--- a/t/13-mod_perl.t
+++ b/t/13-mod_perl.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/14-cgi_apache.t b/t/14-cgi_apache.t
index 75a5efd..cbe2470 100644
--- a/t/14-cgi_apache.t
+++ b/t/14-cgi_apache.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/15-daemon.t b/t/15-daemon.t
index 02d5ad4..22de427 100644
--- a/t/15-daemon.t
+++ b/t/15-daemon.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/17-mod_soap.t b/t/17-mod_soap.t
index b0f4942..72be66c 100644
--- a/t/17-mod_soap.t
+++ b/t/17-mod_soap.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/19-apachesoap.t b/t/19-apachesoap.t
index 60e810b..16f550b 100644
--- a/t/19-apachesoap.t
+++ b/t/19-apachesoap.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/21-public.t b/t/21-public.t
index 8009427..1784994 100644
--- a/t/21-public.t
+++ b/t/21-public.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
     unless(grep /blib/, @INC) {
diff --git a/t/22-interop_apache.t b/t/22-interop_apache.t
index 287c996..4690a23 100644
--- a/t/22-interop_apache.t
+++ b/t/22-interop_apache.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/23-ppm.t b/t/23-ppm.t
index 80c3606..756bbb0 100644
--- a/t/23-ppm.t
+++ b/t/23-ppm.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/24-wsdl.t b/t/24-wsdl.t
index 3a65114..8b07715 100644
--- a/t/24-wsdl.t
+++ b/t/24-wsdl.t
@@ -1,4 +1,4 @@
-#!/bin/env perl
+#!/usr/bin/env perl
 
 BEGIN {
   unless(grep /blib/, @INC) {
diff --git a/t/Issues/rt107924.t b/t/Issues/rt107924.t
new file mode 100644
index 0000000..f9b162d
--- /dev/null
+++ b/t/Issues/rt107924.t
@@ -0,0 +1,16 @@
+use strict;
+use warnings;
+use Test::More tests => 2;
+use SOAP::Lite;
+
+my ($opts, $soap);
+my $proxy = 'http://services.soaplite.com/echo.cgi';
+my $cafile = '/foo/bar';
+
+$opts = [ verify_hostname => 0, SSL_ca_file => $cafile ];
+$soap = SOAP::Lite->proxy ($proxy, ssl_opts => $opts);
+is ($soap->transport->ssl_opts ('SSL_ca_file'), $cafile, "ssl_opts as arrayref is honoured");
+
+$opts = { verify_hostname => 0, SSL_ca_file => $cafile };
+$soap = SOAP::Lite->proxy ($proxy, ssl_opts => $opts);
+is ($soap->transport->ssl_opts ('SSL_ca_file'), $cafile, "ssl_opts as hashref is honoured");
diff --git a/t/SOAP/Transport/HTTP/CGI.t b/t/SOAP/Transport/HTTP/CGI.t
index e4d988e..18914ac 100644
--- a/t/SOAP/Transport/HTTP/CGI.t
+++ b/t/SOAP/Transport/HTTP/CGI.t
@@ -47,6 +47,9 @@ no warnings qw(redefine once uninitialized);
 
 use Test::More;
 use SOAP::Lite; # +trace;
+use utf8;
+use Encode;
+
 my $soap = SOAP::Lite->new()->proxy('http://');
 
 
@@ -61,7 +64,7 @@ my $result = $som->result;
 if ($] >= 5.008) {
     ok utf8::is_utf8($result), 'return utf8 string';
     {
-        is $result, 'Überall', 'utf8 content: ' . $result;
+        is $result, Encode::encode_utf8('Überall'), 'utf8 content: ' . $result;
     }
 }
 else {
diff --git a/t/release-pod-syntax.t b/t/author-pod-syntax.t
similarity index 52%
rename from t/release-pod-syntax.t
rename to t/author-pod-syntax.t
index cdd6a6c..2233af0 100644
--- a/t/release-pod-syntax.t
+++ b/t/author-pod-syntax.t
@@ -1,13 +1,14 @@
 #!perl
 
 BEGIN {
-  unless ($ENV{RELEASE_TESTING}) {
-    require Test::More;
-    Test::More::plan(skip_all => 'these tests are for release candidate testing');
+  unless ($ENV{AUTHOR_TESTING}) {
+    print qq{1..0 # SKIP these tests are for testing by the author\n};
+    exit
   }
 }
 
 # This file was automatically generated by Dist::Zilla::Plugin::PodSyntaxTests.
+use strict; use warnings;
 use Test::More;
 use Test::Pod 1.41;
 
diff --git a/t/release-kwalitee.t b/t/release-kwalitee.t
index 806977c..0b5929a 100644
--- a/t/release-kwalitee.t
+++ b/t/release-kwalitee.t
@@ -1,17 +1,19 @@
+#!perl
 
 BEGIN {
   unless ($ENV{RELEASE_TESTING}) {
-    require Test::More;
-    Test::More::plan(skip_all => 'these tests are for release candidate testing');
+    print qq{1..0 # SKIP these tests are for release candidate testing\n};
+    exit
   }
 }
 
-# this test was generated with Dist::Zilla::Plugin::Test::Kwalitee 2.11
+
+# This test is generated by Dist::Zilla::Plugin::Test::Kwalitee::Extra
 use strict;
 use warnings;
-use Test::More 0.88;
-use Test::Kwalitee 1.21 'kwalitee_ok';
+use Test::More;   # needed to provide plan.
 
-kwalitee_ok();
+eval { require Test::Kwalitee::Extra };
+plan skip_all => "Test::Kwalitee::Extra required for testing kwalitee: $@" if $@;
 
-done_testing;
+eval "use Test::Kwalitee::Extra qw( !use_warnings !prereq_matches_use )"

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libsoap-lite-perl.git



More information about the Pkg-perl-cvs-commits mailing list