2 use OpenAFS
::CMU_copyright
;
3 use OpenAFS
::util
qw(:DEFAULT %AFS_Help);
13 &AFS_pts_setf(testuser1,"S-M--",30,);
14 %info = &AFS_pts_examine(testuser1,);
15 if ($info{'creator'} ne "admin") {
18 if ($info{'flags'} ne "S-M--") {
21 if ($info{'group_quota'} != 30) {