remember selected entry in inspectors;
try to reselect when reentering.
--- a/DebugView.st Thu Sep 13 11:26:10 2001 +0200
+++ b/DebugView.st Thu Sep 13 11:26:45 2001 +0200
@@ -24,7 +24,8 @@
stepForReturn actualContext inWrap stackInspector steppedContext
wrapperContext verboseBacktrace firstContext stepHow cachable
currentMethod ignoreBreakpoints stepUntilEntering
- lastStepUntilEntering'
+ lastStepUntilEntering lastSelectionInReceiverInspector
+ lastSelectionInContextInspector'
classVariableNames:'CachedDebugger CachedExclusive OpenDebuggers MoreDebuggingDetail
DebuggingDebugger VerboseBacktraceDefault DefaultIcon
InitialNCHAINShown'
@@ -888,6 +889,8 @@
"/ codeView contents:nil.
(exitAction ~~ #step) ifTrue:[
+ lastSelectionInReceiverInspector := receiverInspector selectedKeyName.
+ lastSelectionInContextInspector := contextInspector selectedKeyName.
receiverInspector release.
contextInspector release.
@@ -4071,6 +4074,8 @@
"/ contextInspector inspect:nil.
"/ ] do:[
contextInspector inspect:con.
+ contextInspector tryToSelectedKeyNamed:lastSelectionInContextInspector.
+
"/ ].
"/ show a stack inspector sometimes
@@ -4305,6 +4310,7 @@
].
receiverInspector inspect:rec.
+ receiverInspector tryToSelectedKeyNamed:lastSelectionInReceiverInspector.
"
the one below is wrong: currently, the
@@ -4394,6 +4400,6 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.280 2001-09-10 14:16:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.281 2001-09-13 09:26:45 cg Exp $'
! !
DebugView initialize!