ad_registration_finite_state_machine_admin_links user_state user_idWhat it does:
Returns the admininistation links to change the user's state in the user_state finite state machine.Defined in: /web/philip/packages/acs-core/admin-procs.tcl
Source code:
set user_finite_state_links [list] switch $user_state { "authorized" { lappend user_finite_state_links "<a target=approve href=delete?[export_url_vars user_id]>ban or delete</a>" } "deleted" { lappend user_finite_state_links "<a target=approve href=undelete?[export_url_vars user_id]>undelete</a>" lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>ban</a>" } "need_email_verification_and_admin_approv" { lappend user_finite_state_links "<a target=approve href=approve?[export_url_vars user_id]>approve</a>" lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>reject</a>" } "need_admin_approv" { lappend user_finite_state_links "<a target=approve href=approve?[export_url_vars user_id]>approve</a>" lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>reject</a>" } "need_email_verification" { lappend user_finite_state_links "<a target=approve href=approve-email?[export_url_vars user_id]>approve email</a>" lappend user_finite_state_links "<a target=approve href=reject?[export_url_vars user_id]>reject</a>" } "rejected" { lappend user_finite_state_links "<a target=approve href=approve?[export_url_vars user_id]>approve</a>" } "banned" { lappend user_finite_state_links "<a target=approve href=unban?[export_url_vars user_id]>unban</a>" } } return $user_finite_state_links