aboutsummaryrefslogtreecommitdiffstats
path: root/testing/perl-test-unit/testcase.patch
blob: 9f2875559154497d86538b8a9a2e735cb4024cd1 (plain)
1
2
3
4
5
6
7
8
9
10
11
--- a/lib/Test/Unit/TestCase.pm
+++ b/lib/Test/Unit/TestCase.pm
@@ -103,7 +103,7 @@
     my $class = ref($_[0]) || $_[0];
     my @tests = ();
     no strict 'refs';
-    if (defined(@{"$class\::TESTS"})) {
+    if (@{"$class\::TESTS"}) {
         push @tests, @{"$class\::TESTS"};
     }
     else {