import SOAP-WSDL 2.00_28 from CPAN
git-cpan-module: SOAP-WSDL git-cpan-version: 2.00_28 git-cpan-authorid: MKUTTER git-cpan-file: authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00_28.tar.gz
This commit is contained in:
1 parent
eb096ad88e
commit
7ca2154ad6
37 files changed
+446
-286
No files matched your search
@@ -1,9 +1,10 @@
|
||||
use Test::More tests => 30;
|
||||
use strict;
|
||||
use Carp qw(cluck);
|
||||
|
||||
$SIG{__WARN__} = sub { cluck @_ };
|
||||
use warnings;
|
||||
#use Carp qw(cluck);
|
||||
#
|
||||
#$SIG{__WARN__} = sub { cluck @_ };
|
||||
#use warnings;
|
||||
use lib '../lib';
|
||||
use Date::Format;
|
||||
use Date::Parse;
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
use Test::More tests => 7;
|
||||
use strict;
|
||||
use warnings;
|
||||
use lib '../lib';
|
||||
use Test::More tests => 7;
|
||||
use Date::Parse;
|
||||
use Date::Format;
|
||||
|
||||
|
||||
@@ -45,7 +45,7 @@ package main;
|
||||
use Test::More tests => 100;
|
||||
use Storable;
|
||||
|
||||
my $have_warn = eval { use Test::Warn; 1; };
|
||||
my $have_warn = eval { require Test::Warn; import Test::Warn; 1; };
|
||||
|
||||
my $obj;
|
||||
|
||||
@@ -67,7 +67,7 @@ is scalar keys %{ $hash_of_ref }, 0;
|
||||
|
||||
SKIP: {
|
||||
skip 'Cannot test warnings without Test::Warn', 1 if not $have_warn;
|
||||
warning_is { $obj->add_test() } 'attempting to add empty value to MyType';
|
||||
warning_is( sub { $obj->add_test() }, 'attempting to add empty value to MyType' );
|
||||
}
|
||||
|
||||
$obj = MyType->new({ test => 'Test1'});
|
||||
|
||||
Reference in new issue
Block a user