cc28c56ad5
The content of this branch was automatically imported from Fedora ELN with the following as its source: https://src.fedoraproject.org/rpms/perl-Class-Inner#6f34a099caee22f07fd0ebee2a021fcec88a20a5
10 lines
399 B
Diff
10 lines
399 B
Diff
diff -up Class-Inner-0.1/t/basic.t.BAD Class-Inner-0.1/t/basic.t
|
|
--- Class-Inner-0.1/t/basic.t.BAD 2008-03-06 14:09:44.000000000 -0500
|
|
+++ Class-Inner-0.1/t/basic.t 2008-03-06 14:10:13.000000000 -0500
|
|
@@ -45,4 +45,4 @@ is($ic->poly(), 'b', '$ic->poly is
|
|
|
|
$ic = undef;
|
|
|
|
-ok(!$ic_class->isa('Parent'), 'Class dismissed');
|
|
+ok(!(ref $ic_class && $ic_class->isa('Parent')), 'Class dismissed');
|