wap_maybe_redirect_for_registrationWhat it does:
Like the ad_maybe_redirect_for_registration, but redirects to wap login.Defined in: /web/philip/tcl/wap-defs.tcl
Source code:
set user_id [ad_verify_and_get_user_id]
if !$user_id {
set return_url_stub [ns_conn url]
# Here it's okay to use a root-level reference since we're logging in.
wap_returnredirect /wap/register/user-login.wap?[export_url_vars return_url_stub] "Login required."
ad_script_abort
}