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