--- a/Smalltalk.st	Fri Oct 30 16:30:39 2009 +0100
+++ b/Smalltalk.st	Fri Oct 30 17:30:24 2009 +0100
@@ -342,8 +342,15 @@
             langString := envString copyTo:(i - 1).
             terrString := envString copyFrom:(i + 1)
         ].
-        Language := langString asLowercase asSymbol.
-        LanguageTerritory := terrString asLowercase asSymbol
+        langString := langString asLowercase.
+        terrString := terrString asLowercase.
+        (langString = 'c' or:[terrString = 'c']) ifTrue:[
+            ('Smalltalk [info]: ignoring wrong LANG setting (%1_%2) - using english' 
+                    bindWith:langString with:terrString) infoPrintCR.
+        ] ifFalse:[
+            Language := langString asSymbol.
+            LanguageTerritory := terrString asSymbol
+        ]
     ].
 
     "
@@ -7368,9 +7375,9 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.906 2009-10-30 15:30:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.907 2009-10-30 16:30:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.906 2009-10-30 15:30:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.907 2009-10-30 16:30:24 cg Exp $'
 ! !