do not clobber the labels &-escapes
authorClaus Gittinger <cg@exept.de>
Tue, 29 Sep 1998 12:03:40 +0200
changeset 1007 98f4db3e2d23
parent 1006 bc36367c17b6
child 1008 327f93d57c7b
do not clobber the labels &-escapes
MenuEditor.st
--- a/MenuEditor.st	Fri Sep 25 20:22:05 1998 +0200
+++ b/MenuEditor.st	Tue Sep 29 12:03:40 1998 +0200
@@ -2613,7 +2613,7 @@
 
     |rtv|
 
-    self label:(anItem label).
+    self label:(anItem rawLabel).
     activeHelpKey := anItem activeHelpKey.
 
     (enabled := anItem enabled) isSymbol ifFalse:[
@@ -2652,7 +2652,7 @@
         ]
     ]
 
-    "Modified: / 14.8.1998 / 15:37:20 / cg"
+    "Modified: / 29.9.1998 / 11:18:25 / cg"
 ! !
 
 !MenuEditor::Item methodsFor:'conversion'!