Index: openacs-4/packages/acs-lang/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/index.tcl,v diff -u -r1.15.2.4 -r1.15.2.5 --- openacs-4/packages/acs-lang/www/admin/index.tcl 26 Apr 2019 13:55:27 -0000 1.15.2.4 +++ openacs-4/packages/acs-lang/www/admin/index.tcl 18 Jun 2019 12:56:50 -0000 1.15.2.5 @@ -83,11 +83,12 @@ # # URLs # + set toggle_enabled_p [expr {!$enabled_p}] dict set locale_data msg_edit_url [export_vars -base package-list { locale }] dict set locale_data locale_edit_url [export_vars -base locale-edit { locale }] dict set locale_data locale_delete_url [export_vars -base locale-delete { locale }] dict set locale_data locale_make_default_url [export_vars -base locale-make-default { locale }] - dict set locale_data locale_enabled_p_url [export_vars -base locale-set-enabled-p { locale {enabled_p $enabled_p} }] + dict set locale_data locale_enabled_p_url [export_vars -base locale-set-enabled-p { locale {enabled_p $toggle_enabled_p} }] # # Numbers #