--- a/AbstractSettingsApplication.st	Thu Oct 15 01:58:55 2015 +0200
+++ b/AbstractSettingsApplication.st	Thu Oct 15 02:14:41 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
 	      All Rights Reserved
@@ -6339,6 +6337,8 @@
         switch ifTrue:[
             Transcript showCR:'Changing language setting to ' , languageString string , ' (' , language , ')...'.
             Smalltalk language:language asSymbol territory:(territory ? language) asSymbol.
+            UserPreferences current at:#language put:language asSymbol.
+            UserPreferences current at:#languageTerritory put:(territory ? language) asSymbol.
             ResourcePack flushCachedResourcePacks.
             "/ ResourcePack flushCachedResourcePacks - already done by language-change
         ].