# /packages/lang/www/locale-set.tcl
ad_page_contract {

    Sets a locale for the browser

    @author John Lowry (lowry@ardigita.com)
    @creation-date 29 September 2000
    @cvs-id $Id: locale-set.tcl,v 1.5 2005/02/26 16:00:10 jeffd Exp $
} {
    locale
    {redirect_url {[ns_set iget [ns_conn headers] referer]}}
}

# set the locale property
lang::user::set_locale $locale

ad_returnredirect $redirect_url

