MenuItem.st
changeset 2040 98d3508fd6e1
parent 2036 f8e99bb346e4
child 2047 f3b5fa8cd08e
--- a/MenuItem.st	Mon Apr 18 18:30:07 2005 +0200
+++ b/MenuItem.st	Tue Apr 26 11:55:00 2005 +0200
@@ -782,6 +782,9 @@
             e := rawLabel emphasisAt:(in position).
         ].
         c := in next.
+        c bitsPerCharacter > out collection bitsPerCharacter ifTrue:[
+            out setCollection:(c stringSpecies fromString:out collection).
+        ].
         c == $& ifTrue:[
             in peek == $& ifTrue:[
                 out nextPut:c.
@@ -874,5 +877,5 @@
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.69 2005-03-07 14:19:41 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.70 2005-04-26 09:55:00 cg Exp $'
 ! !