Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 16 Oct 1997 16:42:01 +0200
changeset 1349 1d0a92deed03
parent 1348 f958dbefe269
child 1350 c0fadccd111c
*** empty log message ***
ProcMonitor.st file | annotate | diff | comparison | revisions
ProcessMonitor.st file | annotate | diff | comparison | revisions 
--- a/ProcMonitor.st	Wed Oct 15 13:17:30 1997 +0200
+++ b/ProcMonitor.st	Thu Oct 16 16:42:01 1997 +0200
@@ -165,7 +165,7 @@
             oldSelection notNil ifTrue:[
                 oldSelection := oldSelection collect:[:idx | |pI|
                                                 pI := idx-numHeaderLines.
-                                                pI > processes size ifTrue:[
+                                                (pI > processes size or:[pI < 1]) ifTrue:[
                                                     nil
                                                 ] ifFalse:[
                                                     processes at:pI
@@ -654,5 +654,5 @@
 !ProcessMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/ProcMonitor.st,v 1.56 1997-08-22 15:54:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/ProcMonitor.st,v 1.57 1997-10-16 14:42:01 cg Exp $'
 ! !
--- a/ProcessMonitor.st	Wed Oct 15 13:17:30 1997 +0200
+++ b/ProcessMonitor.st	Thu Oct 16 16:42:01 1997 +0200
@@ -165,7 +165,7 @@
             oldSelection notNil ifTrue:[
                 oldSelection := oldSelection collect:[:idx | |pI|
                                                 pI := idx-numHeaderLines.
-                                                pI > processes size ifTrue:[
+                                                (pI > processes size or:[pI < 1]) ifTrue:[
                                                     nil
                                                 ] ifFalse:[
                                                     processes at:pI
@@ -654,5 +654,5 @@
 !ProcessMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.56 1997-08-22 15:54:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.57 1997-10-16 14:42:01 cg Exp $'
 ! !
hg/stx-libtool