toggle-dont-spam-me-p.tcl

Toggle the 'Don't SPAM me' user preference. Note: this page is apparently not referenced anywhere.

Location:

/packages/acs-subsite/www/pvt/toggle-dont-spam-me-p.tcl

Related Files

• packages/acs-subsite/www/pvt/toggle-dont-spam-me-p.tcl
• packages/acs-subsite/www/pvt/toggle-dont-spam-me-p-postgresql.xql
• packages/acs-subsite/www/pvt/toggle-dont-spam-me-p-oracle.xql

[ hide source ] | [ make this the default ]

File Contents

ad_page_contract {
    Toggle the 'Don't SPAM me' user preference.

    Note: this page is apparently not referenced anywhere.
}

set user_id [ad_conn user_id]
db_dml unused {}

ad_returnredirect "home"
ad_script_abort


# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: