translator-mode-toggle.tcl

Toggle translator mode on/off.

Location:

/packages/acs-lang/www/admin/translator-mode-toggle.tcl

Author:

Lars Pind <lars@collaboraid.biz>

Created:

October 24, 2002

CVS ID:

$Id: translator-mode-toggle.tcl,v 1.4 2018/01/19 21:23:51 gustafn Exp $

Related Files

• packages/acs-lang/www/admin/translator-mode-toggle.tcl

[ hide source ] | [ make this the default ]

File Contents

ad_page_contract {
    Toggle translator mode on/off.
    
    @author Lars Pind (lars@collaboraid.biz)
    @creation-date October 24, 2002
    @cvs-id $Id: translator-mode-toggle.tcl,v 1.4 2018/01/19 21:23:51 gustafn Exp $
} {
    {return_url:localurl "."}
}

lang::util::translator_mode_set [expr {![lang::util::translator_mode_p]}] 

ad_returnredirect $return_url
ad_script_abort

# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: