Change 13980 by jhi@alpha on 2001/12/31 14:29:17
Planning still not right.
Affected files ...
.... //depot/perl/lib/User/grent.t#4 edit
Differences ...
==== //depot/perl/lib/User/grent.t#4 (text) ====
Index: perl/lib/User/grent.t
--- perl/lib/User/grent.t.~1~ Mon Dec 31 07:45:06 2001
+++ perl/lib/User/grent.t Mon Dec 31 07:45:06 2001
@@ -22,9 +22,11 @@
unless (@grent) { plan skip_all => "no gid 0"; }
}
-plan tests => 5;
+BEGIN {
+ plan tests => 5;
+ use_ok('User::grent');
+}
-BEGIN { use_ok('User::grent'); }
can_ok(__PACKAGE__, 'getgrgid');
my $grent = getgrgid 0;
End of Patch.
