--- a/ProcessMonitor.st Thu Apr 24 18:24:21 1997 +0200
+++ b/ProcessMonitor.st Thu Apr 24 21:17:56 1997 +0200
@@ -154,7 +154,14 @@
processes notNil ifTrue:[
oldSelection := listView selection.
oldSelection notNil ifTrue:[
- oldSelection := oldSelection collect:[:idx | processes at:idx-numHeaderLines].
+ oldSelection := oldSelection collect:[:idx | |pI|
+ pI := idx-numHeaderLines.
+ pI > processes size ifTrue:[
+ nil
+ ] ifFalse:[
+ processes at:pI
+ ]
+ ].
newSelection := OrderedCollection new.
].
@@ -341,7 +348,7 @@
]
"Modified: 3.7.1996 / 13:56:01 / stefan"
- "Modified: 28.3.1997 / 16:58:17 / cg"
+ "Modified: 24.4.1997 / 21:16:25 / cg"
! !
!ProcessMonitor methodsFor:'initialization'!
@@ -621,5 +628,5 @@
!ProcessMonitor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.52 1997-03-28 15:59:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.53 1997-04-24 19:17:56 cg Exp $'
! !