message-conflict-resolve.tcl

Mark conflict of an I18N message as resolved, i.e. set the conflict_p flag to false.

Location:

/packages/acs-lang/www/admin/message-conflict-resolve.tcl

Author:

Peter Marklund

Related Files

• packages/acs-lang/www/admin/message-conflict-resolve.tcl

[ hide source ] | [ make this the default ]

File Contents

ad_page_contract {
    Mark conflict of an I18N message as resolved, i.e.
    set the conflict_p flag to false.

    @author Peter Marklund
} {
    package_key:token
    message_key
    locale:word
    {return_url:localurl {[export_vars -base "message-conflicts" { package_key locale }]}}
}

lang::message::edit $package_key $message_key $locale [list conflict_p f]

ad_returnredirect $return_url
ad_script_abort

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