--- a/VariablePanel.st	Wed Mar 05 16:53:03 2014 +0100
+++ b/VariablePanel.st	Wed Mar 05 23:13:49 2014 +0100
@@ -2591,7 +2591,7 @@
 !
 
 at:key put:aValue
-    self perform:(key,':') asSymbol with:aValue
+    self perform:key asMutator with:aValue
 
     "Created: / 31-10-2010 / 12:38:48 / cg"
 ! !
@@ -2599,10 +2599,10 @@
 !VariablePanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.98 2014-02-18 17:16:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.99 2014-03-05 22:13:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.98 2014-02-18 17:16:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.99 2014-03-05 22:13:49 cg Exp $'
 ! !