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.2 -r1.3
--- openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	21 Oct 2002 11:39:12 -0000	1.2
+++ openacs-4/packages/acs-lang/tcl/lang-catalog-procs.tcl	7 Nov 2002 12:13:51 -0000	1.3
@@ -215,7 +215,7 @@
    } {
        # Put the messages in an array so it's easier to access them
        array set messages_array $messages_list
-       set message_key_list [array names messages_array]
+       set message_key_list [lsort [array names messages_array]]
 
        # Extract package_key, locale, and charset from the file path
        if { ![regexp {(?i)([^/]+)\.([a-z]{2}_[a-z]{2})\.(.*)\.xml$} $file_path match package_key locale charset] } {