ChunkBrowser>>streamIn:

Ian,

I found the following changes helpful; others might too.

Have a good one,

Bill

=======================

!ChunkBrowser methodsFor!

clipboardOpen
        self streamIn:Clipboard current getText readStream.
! !
!ChunkBrowser categoriesFor: #clipboardOpen!commands!public! !

!ChunkBrowser methodsFor!

streamIn:readStream

        Cursor wait
                showWhile:
                        [self model fromStream: readStream.
                        chunkList selectionOrNil: nil.
                        self updateChunkList].
        self caption: 'ChunkBrowser - Clipboard'! !
!ChunkBrowser categoriesFor: #streamIn:!commands!public! !




--
Wilhelm K. Schwab, Ph.D.
[hidden email]