Take care for nil fields when sorting
authorStefan Vogel <sv@exept.de>
Tue, 18 Feb 2003 15:34:02 +0100
changeset 4568 9576c0894332
parent 4567 54ca93dc6cb0
child 4569 4ed41e57a325
Take care for nil fields when sorting
ProcessMonitorV2.st
--- a/ProcessMonitorV2.st	Tue Feb 18 14:46:27 2003 +0100
+++ b/ProcessMonitorV2.st	Tue Feb 18 15:34:02 2003 +0100
@@ -2137,8 +2137,8 @@
     sortBlock := [:a :b | 
             |entry1 entry2|
 
-            entry1 := (a perform:aSymbol).
-            entry2 := (b perform:aSymbol).
+            entry1 := (a perform:aSymbol) ? 0.
+            entry2 := (b perform:aSymbol) ? 0.
             entry1 = entry2 ifTrue:[
                 a idVal < 0 ifTrue:[
                     "/ two dead ones (take anything which remains constant)
@@ -2151,7 +2151,7 @@
                     a idVal < b idVal
                 ]
             ] ifFalse:[
-                entry1 perform:cmpOp with:entry2 
+                entry1 perform:cmpOp with:entry2
             ]
         ].
    self viewedColumnsChanged.
@@ -2628,5 +2628,5 @@
 !ProcessMonitorV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitorV2.st,v 1.9 2003-02-18 08:08:56 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ProcessMonitorV2.st,v 1.10 2003-02-18 14:34:02 stefan Exp $'
 ! !