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
    }