ad_have_i_gone_insane_pWhat it does:
Returns 1 if the user has gone insane, or 0 if not.Defined in: /web/philip/packages/acs-core/utilities-procs.tcl
Source code:
set email [db_string "select email from users where user_id = [ad_get_user_id]"]
if { [string compare $email "abe@arsdigita.com"] } {
return 0
} else {
return 1
}