whenListChanged: aBlock
� � � � "Specify a block to value after the contents of the list has changed"
� � � � "Basically when you set a new list of items"
� � � � <api: #event>
� � � � | block |
� � � � block := [ :announcement :ann |
� � � � aBlock
� � � � � � � � cull: announcement newContents
� � � � � � � � cull: announcement oldContents
� � � � � � � � cull: announcement
� � � � � � � � cull: ann ].
� � � � listAnnouncer weak
� � � � � � � � when: ValueChanged
� � � � � � � � do: block