--- a/UserPreferences.st	Thu Apr 25 11:30:13 2013 +0100
+++ b/UserPreferences.st	Fri Apr 26 15:26:55 2013 +0100
@@ -609,6 +609,7 @@
 ! !
 
 
+
 !UserPreferences methodsFor:'accessing-locale'!
 
 dateInputFormat
@@ -2646,7 +2647,7 @@
     ((aMessage numArgs == 1)
     and:[ (k endsWith:$:)])
     ifTrue:[
-        k := (k copyWithoutLast:1) asSymbol.
+        k := (k copyButLast:1) asSymbol.
         ^ self at:k put:(aMessage arg1)
     ].
 
@@ -4035,7 +4036,6 @@
     "Created: / 19-08-2011 / 12:51:58 / cg"
 ! !
 
-
 !UserPreferences methodsFor:'default settings-syntax colors'!
 
 listOfPredefinedSyntaxColoringSchemes
@@ -4306,11 +4306,11 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.330 2013-04-24 14:04:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.331 2013-04-25 13:09:18 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.330 2013-04-24 14:04:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.331 2013-04-25 13:09:18 stefan Exp $'
 !
 
 version_SVN