Tools__MethodCategoryList.st
changeset 17405 7dea25a92c4f
parent 17333 70bcc86168e6
child 17447 7c329f41ea07
equal deleted inserted replaced
17404:8786f9f4241b 17405:7dea25a92c4f
   526                     ].
   526                     ].
   527                     "/ method was added - update the methodList
   527                     "/ method was added - update the methodList
   528                     "/ Q: is this needed (methodCategoryList should send me a new inGenerator)
   528                     "/ Q: is this needed (methodCategoryList should send me a new inGenerator)
   529                     listValid == true ifTrue:[ self invalidateList ].
   529                     listValid == true ifTrue:[ self invalidateList ].
   530 
   530 
   531                     "/ if its category is selected, updateOutputGenerator
   531                     "/ if it's category is selected, updateOutputGenerator
   532                     selectedCategories := selectedProtocolsHolder value.
   532                     selectedCategories := selectedProtocolsHolder value.
   533                     selectedCategories size > 0 ifTrue:[
   533                     selectedCategories size > 0 ifTrue:[
   534                         selectedCategories := selectedCategories collect:[:each | each ifNil:[self class nameListEntryForNILCategory]].
   534                         selectedCategories := selectedCategories collect:[:each | each ifNil:[self class nameListEntryForNILCategory]].
   535                         selectedCategories := selectedCategories collect:[:each | each string].
   535                         selectedCategories := selectedCategories collect:[:each | each string].
   536 
   536 
   700 
   700 
   701     super delayedUpdate:something with:aParameter from:changedObject
   701     super delayedUpdate:something with:aParameter from:changedObject
   702 
   702 
   703     "Created: / 05-02-2000 / 13:42:10 / cg"
   703     "Created: / 05-02-2000 / 13:42:10 / cg"
   704     "Modified: / 23-09-2011 / 20:37:31 / cg"
   704     "Modified: / 23-09-2011 / 20:37:31 / cg"
       
   705     "Modified (comment): / 13-02-2017 / 20:33:18 / cg"
   705 !
   706 !
   706 
   707 
   707 getSelectedProtocolsFromIndices
   708 getSelectedProtocolsFromIndices
   708     |l|
   709     |l|
   709 
   710