--- a/ContextInspectorView.st	Wed Nov 23 00:12:17 1994 +0100
+++ b/ContextInspectorView.st	Mon Nov 28 22:11:47 1994 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.6 1994-11-22 23:12:15 claus Exp $
+$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.7 1994-11-28 21:11:46 claus Exp $
 '!
 
 !ContextInspectorView class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.6 1994-11-22 23:12:15 claus Exp $
+$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.7 1994-11-28 21:11:46 claus Exp $
 "
 !
 
@@ -63,11 +63,13 @@
     menu1 := PopUpMenu
 		  labels:(resources array:#(
 					    'inspect'
+					    'basicInspect'
 					    '-'
 					    'show temporaries'
 					   ))
 	       selectors:#(
 			   doInspect
+			   doBasicInspect
 			   nil
 			   showTemporaries
 			  )
@@ -83,7 +85,6 @@
     |aList homeContext method names rec sel implementorClass 
      argNames varNames tmpNames|
 
-    realized ifFalse:[^ self].
 
     inspectedObject := nil.
     inspectedContext := con.
@@ -96,6 +97,8 @@
 	^ self
     ].
 
+"/    realized ifFalse:[^ self].
+
     homeContext := con methodHome.
 
     homeContext isNil ifTrue:[