Merge branch 'vincent/rvalue_stmt_given' into blead
[p5sagit/p5-mst-13.2.git] / lib / User / grent.t
index 8803429..3002b6e 100644 (file)
@@ -18,16 +18,19 @@ BEGIN {
 }
 
 BEGIN {
-    our @grent = getgrgid 0; # This is the function getgrgid.
+    our $gid = $^O ne 'cygwin' ? 0 : 18;
+    our @grent = getgrgid $gid; # This is the function getgrgid.
     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;
+my $grent = getgrgid $gid;
 
 is( $grent->name, $grent[0],    'name matches core getgrgid' );