- modernize Tcl (use byte-compiled comparisons)
- remove deprecated call (ad_get_user_id)