File Class-AutoClass_Build_n_Test.patch of Package perl-Class-AutoClass

Overview Repositories Revisions Requests Users Attributes Meta

File Class-AutoClass_Build_n_Test.patch of Package perl-Class-AutoClass (Revision ec8606128c554418be9408766d53107d)

Currently displaying revision ec8606128c554418be9408766d53107d , Show latest

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);

Places

File Class-AutoClass_Build_n_Test.patch of Package perl-Class-AutoClass (Revision ec8606128c554418be9408766d53107d)

Places