1 files changed, 11 insertions, 3 deletions
diff --git a/cpan/Unicode-Collate/t/loc_hu.t b/cpan/Unicode-Collate/t/loc_hu.t
index b70907c074..c8ef8d3e78 100644
--- a/cpan/Unicode-Collate/t/loc_hu.t
+++ b/cpan/Unicode-Collate/t/loc_hu.t
@@ -11,11 +11,19 @@ BEGIN {
     }
 }
 
-use Test;
-BEGIN { plan tests => 235 };
-
 use strict;
 use warnings;
+BEGIN { $| = 1; print "1..235\n"; }
+my $count = 0;
+sub ok ($;$) {
+    my $p = my $r = shift;
+    if (@_) {
+	my $x = shift;
+	$p = !defined $x ? !defined $r : !defined $r ? 0 : $r eq $x;
+    }
+    print $p ? "ok" : "not ok", ' ', ++$count, "\n";
+}
+
 use Unicode::Collate::Locale;
 
 ok(1);