Index: openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl,v diff -u -r1.60 -r1.60.2.1 --- openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl 25 Jul 2018 19:34:13 -0000 1.60 +++ openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl 1 Mar 2019 15:10:27 -0000 1.60.2.1 @@ -183,7 +183,7 @@ # the en_US catalog files directly to add keys and they might mess up the # utf-8 encoding of the files when doing so. set system_charset [lang::util::charset_for_locale $locale] - set file_charset [ad_decode $system_charset "ISO-8859-1" $system_charset utf-8] + set file_charset [expr {$system_charset eq "ISO-8859-1" ? $system_charset : "utf-8"}] } set message_backup_prefix ""