From: Rainer Tammer <tammer@tammer.net>
Date: Sun, 16 May 2010 09:37:57 +0000 (+0200)
Subject: Fix groups.t test on AIX
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2823ea9b50ecf90078608b65b330273292d4304e;p=p5sagit%2Fp5-mst-13.2.git

Fix groups.t test on AIX

'id -a' doesn't work, so try it without the -a if that fails.
---

diff --git a/t/op/groups.t b/t/op/groups.t
index c1cc889..ed549a0 100644
--- a/t/op/groups.t
+++ b/t/op/groups.t
@@ -196,13 +196,14 @@ sub _system_groups {
     # prefer 'id' over 'groups' (is this ever wrong anywhere?)
     # and 'id -a' over 'id -Gn' (the former is good about spaces in group names)
 
-    $cmd = 'id -a 2>/dev/null';
+    $cmd = 'id -a 2>/dev/null || id 2>/dev/null';
     $str = `$cmd`;
     if ( $str && $str =~ /groups=/ ) {
         # $str is of the form:
         # uid=39957(gsar) gid=22(users) groups=33536,39181,22(users),0(root),1067(dev)
         # FreeBSD since 6.2 has a fake id -a:
         # uid=1001(tobez) gid=20(staff) groups=20(staff), 0(wheel), 68(dialer)
+        # On AIX it's id
         #
         # Linux may also have a context= field