hide-email.tcl

changes show_email field in user's table

Location:

/packages/acs-subsite/www/pvt/hide-email.tcl

Related Files

• packages/acs-subsite/www/pvt/hide-email.xql
• packages/acs-subsite/www/pvt/hide-email.tcl

[ hide source ] | [ make this the default ]

File Contents

# /pvt/hide-email.tcl

ad_page_contract {
    changes show_email field in user's table
} {
    hide:notnull
    user_id:naturalnum,notnull
}

db_dml update_show_email {}

ad_returnredirect "/pvt/home"
ad_script_abort
# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: