--- a/InspectorView.st Sat Jan 23 13:48:57 2016 +0100
+++ b/InspectorView.st Sat Jan 23 13:50:24 2016 +0100
@@ -1360,8 +1360,6 @@
"/ (anObject isNil and:[object isNil]) ifTrue:[^ self].
-Transcript show:'object: '; showCR:object.
-Transcript show:'anObject: '; showCR:anObject.
sameObject := (anObject == object) and:[object notNil].
"/ JV@2011-08-06: Be carefull here, classes may be variable-lenght,
@@ -1369,14 +1367,9 @@
"/ (caused problems expecially when stack inspector is shown in debugger).
"/ To fix, I've added ------------------------v
sameClass := (anObject class == object class) and:[anObject class isVariable not].
-Transcript show:'sameObject: '; showCR:sameObject.
-Transcript showCR:sameClass.
-Transcript showCR:selectionIndex.
-Transcript showCR:(listView list ? #()).
selectionIndex notNil ifTrue:[
oldSelectedField := (listView list ? #()) at:selectionIndex ifAbsent:nil.
].
-Transcript showCR:oldSelectedField.
inspectedObject := object := anObject.
keepList := ((sameObject | sameClass) and:[listView list notEmptyOrNil]).