From bbce3ca648eab3f375216d4c9eba05cb6e005d05 Mon Sep 17 00:00:00 2001 From: "Michael G. Schwern" Date: Tue, 15 Nov 2011 17:39:07 -0800 Subject: Add class_ok() and object_ok() to t/test.pl. Change every existing instance of isa_ok() to use object_ok(). This is safe because before this point, t/test.pl's isa_ok() only worked on objects. lib/dbmt_common.pl is the last hold out because it uses Test::More. These are like isa_ok() but they also check if it's a class or an object. This lets the core tests defend against outlandish bugs while allowing t/test.pl to retain feature parity with Test::More. --- t/mro/isa_dfs.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't/mro/isa_dfs.t') diff --git a/t/mro/isa_dfs.t b/t/mro/isa_dfs.t index 889ee6e531..77c122ea74 100644 --- a/t/mro/isa_dfs.t +++ b/t/mro/isa_dfs.t @@ -60,6 +60,6 @@ foreach my $package (qw(klonk urkkk kapow kayo thwacke zzzzzwap whamm)) { is("@{mro::get_linear_isa($package)}", "@$isa", "\@ISA for $package"); foreach my $class ($package, @$isa, 'UNIVERSAL') { - isa_ok($ref, $class, $package); + object_ok($ref, $class, $package); } } -- cgit v1.2.1