--- a/MenuItem.st	Tue Oct 23 19:24:17 2012 +0200
+++ b/MenuItem.st	Sat Nov 03 09:38:56 2012 +0100
@@ -970,7 +970,7 @@
     in := rawLabel readStream.
     [in atEnd] whileFalse:[
         emp notNil ifTrue:[
-            e := rawLabel emphasisAt:(in position).
+            e := rawLabel emphasisAt:(in position1Based).
         ].
         c := in next.
         c bitsPerCharacter > out collection bitsPerCharacter ifTrue:[
@@ -1097,9 +1097,9 @@
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.99 2012-09-09 13:14:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.100 2012-11-03 08:38:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.99 2012-09-09 13:14:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.100 2012-11-03 08:38:56 cg Exp $'
 ! !