Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Tomcat42
perl-Class-AutoClass
Class-AutoClass_Build_n_Test.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File Class-AutoClass_Build_n_Test.patch of Package perl-Class-AutoClass
diff -ruN Class-AutoClass-1.53-orig/t/autoclass.000.code_exists.t Class-AutoClass-1.53/t/autoclass.000.code_exists.t --- Class-AutoClass-1.53-orig/t/autoclass.000.code_exists.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.000.code_exists.t 2010-08-21 21:38:42.000000000 +0200 @@ -7,4 +7,4 @@ use_ok( 'Class::AutoClass::Root' ); } diag( "Testing Class::AutoClass $Class::AutoClass::VERSION, Perl $], $^X" ); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.001.boilerplate.t Class-AutoClass-1.53/t/autoclass.001.boilerplate.t --- Class-AutoClass-1.53-orig/t/autoclass.001.boilerplate.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.001.boilerplate.t 2010-08-21 21:38:42.000000000 +0200 @@ -49,5 +49,5 @@ module_boilerplate_ok('lib/Class/AutoClass.pm'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.002.pod.t Class-AutoClass-1.53/t/autoclass.002.pod.t --- Class-AutoClass-1.53-orig/t/autoclass.002.pod.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.002.pod.t 2010-08-21 21:48:12.000000000 +0200 @@ -10,4 +10,4 @@ plan skip_all => "Test::Pod $min_tp required for testing POD" if $@; all_pod_files_ok(all_pod_files()); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.010.basics.t Class-AutoClass-1.53/t/autoclass.010.basics.t --- Class-AutoClass-1.53-orig/t/autoclass.010.basics.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.010.basics.t 2010-08-21 21:50:57.000000000 +0200 @@ -217,4 +217,4 @@ @$actual{@attrs}=$object->get(@attrs); cmp_values($actual,$correct,'get new values via get all at once'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.011.class_attributes.t Class-AutoClass-1.53/t/autoclass.011.class_attributes.t --- Class-AutoClass-1.53-orig/t/autoclass.011.class_attributes.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.011.class_attributes.t 2010-08-21 21:44:39.000000000 +0200 @@ -3,7 +3,7 @@ use Parent; use Child; use GrandChild; -use Test::More; +use Test::More qw(no_plan); my $p = Parent->population; is ($p, 42, 'class variable init\'d at declare time, also answer to life, universe, etc'); @@ -60,4 +60,4 @@ is (Parent->class_hash->{these}, 'those', 'invokation by classname to get a hash value'); is (GrandChild->class_hash->{these}, 'them', 'invokation by classname to get a hash value w/inheritance'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.011.inconsistent.t Class-AutoClass-1.53/t/autoclass.011.inconsistent.t --- Class-AutoClass-1.53-orig/t/autoclass.011.inconsistent.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.011.inconsistent.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use Test::Deep; # test inconsistent attributes -- ones declared as both instance and class attributes @@ -13,4 +13,4 @@ like($@,qr/^Inconsistent declarations for attribute\(s\) a b/, 'use autoclass_011::Inconsistent2 found expected inconsistencies'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.011.nullify.t Class-AutoClass-1.53/t/autoclass.011.nullify.t --- Class-AutoClass-1.53-orig/t/autoclass.011.nullify.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.011.nullify.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,7 +1,7 @@ use strict; use lib qw(t); use autoclass_011::Nullable; -use Test::More; +use Test::More qw(no_plan); # this tests the ability to nullify (using the '_NULLIFY_' flag) an AutoClass object so as to # return undef to the caller @@ -12,4 +12,4 @@ is($n2, undef,'nullify set: result undef'); isnt(ref $n2, 'Nullable','nullify set: result not blessed'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.011.override.t Class-AutoClass-1.53/t/autoclass.011.override.t --- Class-AutoClass-1.53-orig/t/autoclass.011.override.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.011.override.t 2010-08-21 21:44:39.000000000 +0200 @@ -2,7 +2,7 @@ use lib qw(t); use autoclass_011::Override; use Child; -use Test::More; +use Test::More qw(no_plan); # this tests the ability to override the AutoClass object with another object (using the '_OVERRIDE__' flag) my $over1 = new autoclass_011::Override; @@ -10,4 +10,4 @@ my $over2 = new autoclass_011::Override(override=>1); # causes Override to set __OVERRIDE__ to true is(ref $over2, 'Child','override set'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.020.attributes.t Class-AutoClass-1.53/t/autoclass.020.attributes.t --- Class-AutoClass-1.53-orig/t/autoclass.020.attributes.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.020.attributes.t 2010-08-21 21:50:09.000000000 +0200 @@ -8,4 +8,4 @@ pass('placeholder'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.025.root.t Class-AutoClass-1.53/t/autoclass.025.root.t --- Class-AutoClass-1.53-orig/t/autoclass.025.root.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.025.root.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,5 +1,5 @@ use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use Class::AutoClass::Root; use IO::Scalar; use strict; @@ -41,4 +41,4 @@ untie *STDERR; } -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.030.init_self.t Class-AutoClass-1.53/t/autoclass.030.init_self.t --- Class-AutoClass-1.53-orig/t/autoclass.030.init_self.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.030.init_self.t 2010-08-21 21:52:33.000000000 +0200 @@ -104,4 +104,4 @@ my $obj=new autoclass_030::ragged::r5; cmp_init_self($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.030._ref_.t Class-AutoClass-1.53/t/autoclass.030._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.030._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.030._ref_.t 2010-08-21 21:55:38.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_030'; +#note 'test class prefix is autoclass_030'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_030::ragged::r5; is(ref $obj,'autoclass_030::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.031._ref_.t Class-AutoClass-1.53/t/autoclass.031._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.031._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.031._ref_.t 2010-08-21 21:55:53.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_031'; +#note 'test class prefix is autoclass_031'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_031::ragged::r5; is(ref $obj,'autoclass_031::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.031.super_new.t Class-AutoClass-1.53/t/autoclass.031.super_new.t --- Class-AutoClass-1.53-orig/t/autoclass.031.super_new.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.031.super_new.t 2010-08-21 21:53:40.000000000 +0200 @@ -106,4 +106,4 @@ my $obj=new autoclass_031::ragged::r5; cmp_super_new($obj,{new_history=>[qw(r5 r1)],init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.032.init_self_ac.t Class-AutoClass-1.53/t/autoclass.032.init_self_ac.t --- Class-AutoClass-1.53-orig/t/autoclass.032.init_self_ac.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.032.init_self_ac.t 2010-08-21 21:56:46.000000000 +0200 @@ -105,4 +105,4 @@ my $obj=new autoclass_032::ragged::r5; cmp_init_self($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.032._ref_.t Class-AutoClass-1.53/t/autoclass.032._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.032._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.032._ref_.t 2010-08-21 21:57:04.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_032'; +#note 'test class prefix is autoclass_032'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_032::ragged::r5; is(ref $obj,'autoclass_032::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.033._ref_.t Class-AutoClass-1.53/t/autoclass.033._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.033._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.033._ref_.t 2010-08-21 21:57:30.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_033'; +#note 'test class prefix is autoclass_033'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_033::ragged::r5; is(ref $obj,'autoclass_033::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.033.super_new_ac.t Class-AutoClass-1.53/t/autoclass.033.super_new_ac.t --- Class-AutoClass-1.53-orig/t/autoclass.033.super_new_ac.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.033.super_new_ac.t 2010-08-21 21:57:47.000000000 +0200 @@ -106,4 +106,4 @@ my $obj=new autoclass_033::ragged::r5; cmp_super_new($obj,{new_history=>[qw(r5)],init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.034.external_one.t Class-AutoClass-1.53/t/autoclass.034.external_one.t --- Class-AutoClass-1.53-orig/t/autoclass.034.external_one.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.034.external_one.t 2010-08-21 21:58:20.000000000 +0200 @@ -106,4 +106,4 @@ my $obj=new autoclass_034::ragged::r5; cmp_external($obj,{ext_history=>[qw(ext)],init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.034._ref_.t Class-AutoClass-1.53/t/autoclass.034._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.034._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.034._ref_.t 2010-08-21 21:58:37.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_034'; +#note 'test class prefix is autoclass_034'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_034::ragged::r5; is(ref $obj,'autoclass_034::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.035.external_all.t Class-AutoClass-1.53/t/autoclass.035.external_all.t --- Class-AutoClass-1.53-orig/t/autoclass.035.external_all.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.035.external_all.t 2010-08-21 21:59:02.000000000 +0200 @@ -107,4 +107,4 @@ my $obj=new autoclass_035::ragged::r5; cmp_external($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.035._ref_.t Class-AutoClass-1.53/t/autoclass.035._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.035._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.035._ref_.t 2010-08-21 21:59:22.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_035'; +#note 'test class prefix is autoclass_035'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_035::ragged::r5; is(ref $obj,'autoclass_035::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.036.declare.t Class-AutoClass-1.53/t/autoclass.036.declare.t --- Class-AutoClass-1.53-orig/t/autoclass.036.declare.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.036.declare.t 2010-08-21 21:59:35.000000000 +0200 @@ -104,4 +104,4 @@ my $obj=new autoclass_036::ragged::r5; cmp_init_self($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.036._ref_.t Class-AutoClass-1.53/t/autoclass.036._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.036._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.036._ref_.t 2010-08-21 21:59:52.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_036'; +#note 'test class prefix is autoclass_036'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_036::ragged::r5; is(ref $obj,'autoclass_036::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.037.declare_pkg.t Class-AutoClass-1.53/t/autoclass.037.declare_pkg.t --- Class-AutoClass-1.53-orig/t/autoclass.037.declare_pkg.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.037.declare_pkg.t 2010-08-21 22:00:06.000000000 +0200 @@ -104,4 +104,4 @@ my $obj=new autoclass_037::ragged::r5; cmp_init_self($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.037._ref_.t Class-AutoClass-1.53/t/autoclass.037._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.037._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.037._ref_.t 2010-08-21 22:00:26.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_037'; +#note 'test class prefix is autoclass_037'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_037::ragged::r5; is(ref $obj,'autoclass_037::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.038.init_self_inherit.t Class-AutoClass-1.53/t/autoclass.038.init_self_inherit.t --- Class-AutoClass-1.53-orig/t/autoclass.038.init_self_inherit.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.038.init_self_inherit.t 2010-08-21 22:00:43.000000000 +0200 @@ -104,4 +104,4 @@ my $obj=new autoclass_038::ragged::r5; cmp_init_self($obj,{init_self_history=>[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)]},'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.038._ref_.t Class-AutoClass-1.53/t/autoclass.038._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.038._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.038._ref_.t 2010-08-21 22:01:05.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_038'; +#note 'test class prefix is autoclass_038'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_038::ragged::r5; is(ref $obj,'autoclass_038::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.039.attribute_order.t Class-AutoClass-1.53/t/autoclass.039.attribute_order.t --- Class-AutoClass-1.53-orig/t/autoclass.039.attribute_order.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.039.attribute_order.t 2010-08-21 22:01:27.000000000 +0200 @@ -138,4 +138,4 @@ my $obj=new autoclass_039::ragged::r5 attrs qw(r1 r20 r21 r22 r30 r31 r32 r4 r5); cmp_attribute_order($obj,[qw(r1 r20 r21 r22 r30 r31 r32 r4 r5)],'r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.039._ref_.t Class-AutoClass-1.53/t/autoclass.039._ref_.t --- Class-AutoClass-1.53-orig/t/autoclass.039._ref_.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.039._ref_.t 2010-08-21 22:01:43.000000000 +0200 @@ -6,7 +6,7 @@ use autoclassUtil; # sanity checks -note 'test class prefix is autoclass_039'; +#note 'test class prefix is autoclass_039'; my $autoclass=new Class::AutoClass; is(ref $autoclass,'Class::AutoClass','class is Class::AutoClass - sanity check'); @@ -94,4 +94,4 @@ my $obj=new autoclass_039::ragged::r5; is(ref $obj,'autoclass_039::ragged::r5','r5'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.099.docs.t Class-AutoClass-1.53/t/autoclass.099.docs.t --- Class-AutoClass-1.53-orig/t/autoclass.099.docs.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.099.docs.t 2010-08-21 22:06:15.000000000 +0200 @@ -114,5 +114,5 @@ my($first,$last)=$john->get(qw(first_name last_name)); cmp_deeply([$first,$last],[qw(Joe Brown)],'get in METHODS AND FUNCTIONS'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.100.no_autoclass.t Class-AutoClass-1.53/t/autoclass.100.no_autoclass.t --- Class-AutoClass-1.53-orig/t/autoclass.100.no_autoclass.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.100.no_autoclass.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use autoclass_100::Parent; # this is a regression test covering the use of a class that does not inherit from AutoClass @@ -43,4 +43,4 @@ is($object->syn,'synonym','synonym default'); is($object->real,'synonym','target of synonym equals synonym default'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.101.no_use_parent.t Class-AutoClass-1.53/t/autoclass.101.no_use_parent.t --- Class-AutoClass-1.53-orig/t/autoclass.101.no_use_parent.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.101.no_use_parent.t 2010-08-21 22:07:07.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use Test::Deep; use autoclass_101::Child; @@ -10,7 +10,7 @@ my $child=new autoclass_101::Child; isa_ok($child,'autoclass_101::Child','new'); -note 'test child attributes'; +#note 'test child attributes'; # test defaults is($child->auto_c,'child auto attribute','child auto attribute default'); is($child->other_c,'child other attribute','child other attribute default'); @@ -44,7 +44,7 @@ is($child->real_c,6789,'child target of synonym can be gotten'); is($child->syn_c,6789,'child synonym equals target of synonym'); -note 'test parent attributes'; +#note 'test parent attributes'; # test defaults is($child->auto_p,'parent auto attribute','parent auto attribute default'); is($child->other_p,'parent other attribute','parent other attribute default'); @@ -79,7 +79,7 @@ is($child->syn_p,6789,'parent synonym equals target of synonym'); # test defaults again. should be same as before except for class -note 'test child and parent defaults again. should be same as before except for class'; +#note 'test child and parent defaults again. should be same as before except for class'; my $child =new autoclass_101::Child; is($child->auto_c,'child auto attribute','child auto attribute default 2nd time'); @@ -94,4 +94,4 @@ is($child->syn_p,'parent synonym','parent synonym default 2nd time'); is($child->real_p,'parent synonym','parent target of synonym equals synonym default 2nd time'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.102.use_order.t Class-AutoClass-1.53/t/autoclass.102.use_order.t --- Class-AutoClass-1.53-orig/t/autoclass.102.use_order.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.102.use_order.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use Test::Deep; # this is a regression test covering classes that are 'used' out of order @@ -58,4 +58,4 @@ is($grandchild->parent_class_default,'parent','parent class default set in grandchild'); is($grandchild->stepparent_class_default,'stepparent','stepparent class default set in grandchild'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.103.defaults.t Class-AutoClass-1.53/t/autoclass.103.defaults.t --- Class-AutoClass-1.53-orig/t/autoclass.103.defaults.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.103.defaults.t 2010-08-21 21:44:39.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); use autoclass_103::Parent; use autoclass_103::Child; use autoclass_103::GrandChild; @@ -50,4 +50,4 @@ ok(!defined $grandchild->{'b'},'grandchild: virtual default not stored in object HASH'); # ok(!defined $grandchild->{'z'},'grandchild: unused default not stored in object HASH'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.104.syn_defaults.t Class-AutoClass-1.53/t/autoclass.104.syn_defaults.t --- Class-AutoClass-1.53-orig/t/autoclass.104.syn_defaults.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.104.syn_defaults.t 2010-08-21 22:07:35.000000000 +0200 @@ -1,6 +1,6 @@ use strict; use lib qw(t); -use Test::More; +use Test::More qw(no_plan); # NG 05-12-08: regression test for incorrect handling of defaults for synonyms. # consider syn=>'real'. there are 6 cases @@ -18,7 +18,7 @@ my($parent,$child); -note('Tests for handling of defaults with synonyms. Parent only'); +#note('Tests for handling of defaults with synonyms. Parent only'); my $case; $case='args nothing, defaults syn'; $parent=new autoclass_104::Parent_default_syn; @@ -41,7 +41,7 @@ is($parent->syn,'arg',"parent: $case"); -note('Tests for handling of defaults with synonyms. Parent and Child'); +#note('Tests for handling of defaults with synonyms. Parent and Child'); $case='args nothing, defaults syn'; $parent=new Parent; $child=new autoclass_104::Child_default_syn; @@ -74,4 +74,4 @@ is($parent->syn,'arg',"parent: $case"); is($child->syn,'arg',"child: $case"); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.105.synonyms.t Class-AutoClass-1.53/t/autoclass.105.synonyms.t --- Class-AutoClass-1.53-orig/t/autoclass.105.synonyms.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.105.synonyms.t 2010-08-21 21:44:39.000000000 +0200 @@ -3,7 +3,7 @@ # use lib map {glob($_)} qw(../lib ~/lib/perl5 ~/lib/perl5/site_perl/5.8.5); use Parent; use Child; -use Test::More; +use Test::More qw(no_plan); # this is a regression test covering a bug (SF# 1222961) where synonyms are not created consistent # with the documentation @@ -31,4 +31,4 @@ $child=new Child(whatisya=>'brought you'); is($child->stork, 'brought you', 'var set using "whatisya" (Parent synonym), read using "stork"'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.106.synonyms.t Class-AutoClass-1.53/t/autoclass.106.synonyms.t --- Class-AutoClass-1.53-orig/t/autoclass.106.synonyms.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.106.synonyms.t 2010-08-21 21:44:39.000000000 +0200 @@ -3,7 +3,7 @@ use autoclass_106::Parent; use autoclass_106::Child; use GrandChild; -use Test::More; +use Test::More qw(no_plan); # this is a regression test covering a bug where 2 or more synonyms exist # for the same attribute, one synonym is set in the args, and a default @@ -23,4 +23,4 @@ is($child->syn3, $child->real, 'syn3 same as real'); is($child->syn3, $child->real, 'syn4 same as real'); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclass.107.code_refs.t Class-AutoClass-1.53/t/autoclass.107.code_refs.t --- Class-AutoClass-1.53-orig/t/autoclass.107.code_refs.t 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclass.107.code_refs.t 2010-08-21 21:44:39.000000000 +0200 @@ -19,7 +19,7 @@ package main; use strict; -use Test::More; +use Test::More qw(no_plan); use Test::Deep; # make object and make sure defaults set @@ -54,4 +54,4 @@ my $glob=$obj1->glob_ref; ok(('GLOB' eq ref $glob) && ($$$glob eq "target for testing glob default"),"$label: code ref"); -done_testing(); +#done_testing(); diff -ruN Class-AutoClass-1.53-orig/t/autoclassUtil.pm Class-AutoClass-1.53/t/autoclassUtil.pm --- Class-AutoClass-1.53-orig/t/autoclassUtil.pm 2010-01-06 23:23:10.000000000 +0100 +++ Class-AutoClass-1.53/t/autoclassUtil.pm 2010-08-21 21:44:39.000000000 +0200 @@ -2,7 +2,7 @@ use lib qw(t); use strict; use Carp; -use Test::More; +use Test::More qw(no_plan); # NG 09-11-19: Test::Deep doesn't export cmp_details, deep_diag until recent version (0.104) # so we import them "by hand" instead. import of bag, methods was never needed. # use Test::Deep qw(bag methods cmp_details deep_diag);
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor
