--- a/MiniDebugger.st	Mon May 28 14:03:51 2007 +0200
+++ b/MiniDebugger.st	Mon May 28 14:05:01 2007 +0200
@@ -761,18 +761,18 @@
 
 printAllBacktraces
     Process allInstancesDo:[:p |
-	(p ~~ Processor activeProcess
-	and:[p isDead not]) ifTrue:[
-	    '---------------------------------------------------------' printCR.
-	    '  proc id=' print. p id print.
-	    ' name=''' print. p name print.
-	    ''' createdBy: ' print. p creatorId print.
-	    ' state=' print.  p state print.
-	    ' prio=' print. p priority printCR.
-	    '' printCR. '' printCR.
+        (p isActive not
+        and:[p isDead not]) ifTrue:[
+            '---------------------------------------------------------' printCR.
+            '  proc id=' print. p id print.
+            ' name=''' print. p name print.
+            ''' createdBy: ' print. p creatorId print.
+            ' state=' print.  p state print.
+            ' prio=' print. p priority printCR.
+            '' printCR. '' printCR.
 
-	    self printBacktraceFrom:(p suspendedContext)
-	]
+            self printBacktraceFrom:(p suspendedContext)
+        ]
     ]
 !
 
@@ -842,5 +842,5 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.70 2007-02-07 10:38:27 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.71 2007-05-28 12:05:01 stefan Exp $'
 ! !