David T. Lewis uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-dtl.301.mcz==================== Summary ====================
Name: Collections-dtl.301
Author: dtl
Time: 10 February 2010, 5:56:20.834 pm
UUID: 30d34096-9644-48ed-acae-ae17e9a1fd47
Ancestors: Collections-dtl.300
Change TranscriptStream>>closeAllViews to use #changed: #update: rather than traverse dependents. Removes MVC/Morphic dependency.
Change TranscriptStream>>countOpenTranscripts to select on #isTextView rather than testing #isKindOf: on MVC and Morphic view.
=============== Diff against Collections-dtl.300 ===============
Item was changed:
----- Method: TranscriptStream>>closeAllViews (in category 'initialization') -----
closeAllViews
"Transcript closeAllViews"
+ self changed: #close
+ !
- self dependents do:
- [:d |
- (d isKindOf: PluggableTextView)
- ifTrue: [d topView controller closeAndUnscheduleNoTerminate].
- (d isSystemWindow) ifTrue: [d delete]]!
Item was changed:
----- Method: TranscriptStream>>countOpenTranscripts (in category 'private') -----
countOpenTranscripts
+ "Transcript countOpenTranscripts"
+
+ ^ (self dependents select: [:e | e isTextView]) size
+ !
-
- | openCount |
- openCount := 0.
- self dependents do:
- [:d | ((d isKindOf: PluggableTextView) or:
- [d isKindOf: PluggableTextMorph]) ifTrue: [openCount := openCount + 1]].
- ^ openCount!