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 -N -r1.60.2.3 -r1.60.2.4
--- openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	10 Aug 2019 15:10:51 -0000	1.60.2.3
+++ openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	4 Sep 2019 15:32:46 -0000	1.60.2.4
@@ -144,15 +144,10 @@
 
     @author Peter Marklund
 } {
-    ad_try {
-        glob [package_catalog_dir $package_key]/$package_key.${locale}.*
-    } on ok {r} {
-        set has_file_in_locale_p 1
-    } on error {errorMsg} {
-        set has_file_in_locale_p 0
-    }
+    set locale_files [glob -nocomplain -- \
+                          [package_catalog_dir $package_key]/$package_key.${locale}.*]
 
-    return $has_file_in_locale_p
+    return [expr {[llength $locale_files] > 0}]
 }
 
 ad_proc -private lang::catalog::get_catalog_file_path {