group::default_member_state (public)
group::default_member_state [ -join_policy join_policy ] \ [ -create_p create_p ] [ -no_complain ]
Defined in packages/acs-subsite/tcl/group-procs.tcl
If user has 'create' privilege on group_id OR the group's join policy is 'open', then default_member_state will return "approved". If the group's join policy is 'needs approval' then default_member_state will return 'needs approval'. If the group's join policy is closed then an error will be thrown, unless the no_complain flag is set, in which case empty string is returned.
- Switches:
- -join_policy (optional)
- - the group's join policy (one of 'open', 'closed', or 'needs approval')
- -create_p (optional, defaults to
"false"
)- - 1 if the user has 'create' privilege on the group, 0 otherwise.
- -no_complain (optional, boolean)
- Author:
- Oumi Mehrotra <oumi@arsdigita.com>
- Created:
- 10/2000
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: if {$create_p || $join_policy eq "open"} { return "approved" } if {$join_policy eq "needs approval"} { return "needs approval" } if {$no_complain_p} { error "group::default_member_state - user is not a group admin and join policy is $join_policy." } return ""XQL Not present: Generic PostgreSQL XQL file: packages/acs-subsite/tcl/group-procs-postgresql.xql
Oracle XQL file: packages/acs-subsite/tcl/group-procs-oracle.xql