Index: openacs-4/packages/acs-lang/tcl/locale-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/locale-procs.tcl,v
diff -u -r1.39.2.6 -r1.39.2.7
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	18 Aug 2016 04:34:50 -0000	1.39.2.6
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	18 Aug 2016 04:42:21 -0000	1.39.2.7
@@ -633,9 +633,12 @@
     # acclang is something like 'da,en-us;q=0.8,es-ni;q=0.5,de;q=0.3'
     set acclangv [list]
     foreach elm [split $acclang ","] {
-        # Get rid of trailing ;q=0.5 part
-        set elm [lindex [split $elm ";"] 0]
-
+        # Get rid of trailing ;q=0.5 part and trim spaces
+        set elm [string trimleft [lindex [split $elm ";"] 0] " "]
+        # Ignore the default catchall setting "*"
+        if {$elem eq "*"} {
+            continue
+        }
         # elm is now either like 'da' or 'en-us'
         # make it into something like 'da' or 'en_US'
         set elmv [split $elm "-"]