checkin from browser
authorClaus Gittinger <cg@exept.de>
Sat, 10 Jul 1999 20:35:15 +0200
changeset 1960 ead74f666236
parent 1959 e7b3df3c952f
child 1961 302546d09001
checkin from browser
MenuView.st
--- 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 $'
 ! !