MenuView.st
changeset 1960 ead74f666236
parent 1919 7752e8980de5
child 1989 f9b3c2a361eb
--- a/MenuView.st	Thu Jul 08 17:05:42 1999 +0200
+++ b/MenuView.st	Sat Jul 10 20:35:15 1999 +0200
@@ -693,13 +693,13 @@
         list add:aLabel beforeIndex:i. i := i + 1.
     ].
 
-    selectors := selectors asOrderedCollection.
+    selectors := (selectors ? #()) asOrderedCollection.
     i := idx.
     moreSelectors do:[:sel |
         selectors add:sel beforeIndex:i. i := i + 1.
     ].
 
-    enableFlags := enableFlags asOrderedCollection.
+    enableFlags := (enableFlags ? #()) asOrderedCollection.
     i := idx.
     nMore timesRepeat:[
         enableFlags add:true beforeIndex:i. i := i + 1.
@@ -2735,5 +2735,5 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.122 1999-05-31 11:06:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.123 1999-07-10 18:35:15 cg Exp $'
 ! !