events_group_add_user db event_id user_idWhat it does:
Add's user_id to the user group of event_id's event. Returns 1 if successful, else returns 0.Defined in: /web/philip/tcl/events-defs.tcl
Source code:
set group_id [database_to_tcl_string_or_null $db "select group_id from events_events where event_id = $event_id" 0] if {$group_id == 0} { return 0 } set return_id 1 if [catch {set return_id [ad_user_group_user_add $db $user_id "member" $group_id]} errmsg] { set return_id 0 } return return_id