ad_page_contract { return the page corresponding to the user language @author Emmanuelle Raffenne (eraffenne@gmail.com) @creation-date 2007-10-12 @cvs-id $Id: index.vuh,v 1.3.2.1 2019/05/17 19:22:05 gustafn Exp $ } # set default variables set default_language "en" set user_language [ad_conn language] # redirect if possible set path_info [ad_conn path_info] if {$path_info eq ""} { set path_info "index" } if { ![file exists [acs_root_dir]/packages/dotlrn/www/help/$user_language] } { set user_language $default_language } if { [file exists "[acs_root_dir]/packages/dotlrn/www/help/$user_language/${path_info}.adp"] || [file exists "[acs_root_dir]/packages/dotlrn/www/help/$user_language/${path_info}"]} { rp_internal_redirect /packages/dotlrn/www/help/${user_language}/${path_info} } else { ns_returnnotfound } ad_script_abort # Local variables: # mode: tcl # tcl-indent-level: 4 # indent-tabs-mode: nil # End: