email-confirm.tcl
Page for users to register themselves on the site.
- Location:
- /packages/acs-subsite/www/register/email-confirm.tcl
- CVS ID:
$Id: email-confirm.tcl,v 1.13 2017/08/07 23:47:59 gustafn Exp $
Related Files
- packages/acs-subsite/www/register/email-confirm.tcl
- packages/acs-subsite/www/register/email-confirm.adp
[ hide source ] | [ make this the default ]
File Contents
ad_page_contract { Page for users to register themselves on the site. @cvs-id $Id: email-confirm.tcl,v 1.13 2017/08/07 23:47:59 gustafn Exp $ } { token:notnull,trim user_id:naturalnum,notnull {return_url:localurl ""} } set subsite_id [ad_conn subsite_id] set email_confirm_template [parameter::get -parameter "EmailConfirmTemplate" -package_id $subsite_id] if {$email_confirm_template eq ""} { set email_confirm_template "/packages/acs-subsite/lib/email-confirm" } # Local variables: # mode: tcl # tcl-indent-level: 4 # indent-tabs-mode: nil # End: