checkin from browser
authorClaus Gittinger <cg@exept.de>
Tue, 13 Jul 1999 17:42:43 +0200
changeset 1202 1cc76ca8e500
parent 1201 d8c4b4f52e7e
child 1203 35445f3530a4
checkin from browser
MenuItem.st
--- a/MenuItem.st	Tue Jul 13 17:38:21 1999 +0200
+++ b/MenuItem.st	Tue Jul 13 17:42:43 1999 +0200
@@ -453,9 +453,9 @@
 fromLiteralArrayEncoding:aLiteralEncodedArray
     "read my contents from a aLiteralEncodedArray"
 
+    |selector value|
+
     2 to:aLiteralEncodedArray size by:2 do:[:i |
-        |selector value|
-
         selector := aLiteralEncodedArray at:i.
         value    := (aLiteralEncodedArray at:i+1) decodeAsLiteralArray.
         self perform:selector with:value
@@ -826,5 +826,5 @@
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.27 1999-07-06 16:49:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.28 1999-07-13 15:42:43 cg Exp $'
 ! !