ad_have_i_gone_insane_p

one of the documented procedures in this installation of the ACS
Usage:
ad_have_i_gone_insane_p
What 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
    }


philg@mit.edu