Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v
diff -u -N -r1.132.2.2 -r1.132.2.3
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	29 Sep 2013 19:30:13 -0000	1.132.2.2
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	5 Oct 2013 11:26:21 -0000	1.132.2.3
@@ -137,7 +137,7 @@
       # Reorder the locales and put the connection locale to the front
       # in case we have a connection
       #
-      set defpos [lsearch $locales [lang::conn::locale]]
+      set defpos [lsearch -exact $locales [lang::conn::locale]]
       set locales [linsert [lreplace $locales $defpos $defpos] 0 \
                        [lang::conn::locale]]
     }