--- a/DebugView.st	Thu Jun 27 18:32:23 1996 +0200
+++ b/DebugView.st	Thu Jun 27 18:33:18 1996 +0200
@@ -2052,23 +2052,27 @@
     |oldContext idx|
 
     inspectedProcess state == #dead ifTrue:[
-	self showTerminated.
-	^ self
+        self showTerminated.
+        ^ self
     ].
 
     oldContext := selectedContext.
-    (self setContext:(inspectedProcess suspendedContext)) ifTrue:[
-	oldContext notNil ifTrue:[
-	    contextArray notNil ifTrue:[
-		idx := contextArray identityIndexOf:oldContext.
-		idx ~~ 0 ifTrue:[
-		    self showSelection:idx
-		] ifFalse:[
-		    codeView contents:('** context returned **')
-		]
-	    ]
-	]
-    ]
+    [
+        (self setContext:(inspectedProcess suspendedContext)) ifTrue:[
+            oldContext notNil ifTrue:[
+                contextArray notNil ifTrue:[
+                    idx := contextArray identityIndexOf:oldContext.
+                    idx ~~ 0 ifTrue:[
+                        self showSelection:idx
+                    ] ifFalse:[
+                        codeView contents:('** context returned **')
+                    ]
+                ]
+            ]
+        ].
+    ] valueUninterruptably.
+
+    "Modified: 27.6.1996 / 17:19:53 / cg"
 ! !
 
 !DebugView methodsFor:'private control loop'!
@@ -2541,5 +2545,5 @@
 !DebugView  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.90 1996-06-27 16:32:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.91 1996-06-27 16:33:18 cg Exp $'
 ! !