--- a/ContextInspectorView.st	Tue Feb 25 17:20:14 2014 +0100
+++ b/ContextInspectorView.st	Tue Feb 25 17:33:33 2014 +0100
@@ -497,6 +497,8 @@
 
     |list|
 
+    inspectedContext isNil ifTrue:[ ^ #() ].
+
     names size == 0 ifTrue:[
         (inspectedContext isBlockContext and:[inspectedContext home isNil]) ifTrue:[
             "/ hack to guide beginners
@@ -521,6 +523,7 @@
     ^ list
 
     "Modified: / 16-05-2012 / 18:54:59 / cg"
+    "Modified: / 25-02-2014 / 15:10:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 hasSelfEntry
@@ -744,10 +747,10 @@
 !ContextInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.95 2014-02-22 15:57:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.96 2014-02-25 16:33:33 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.95 2014-02-22 15:57:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.96 2014-02-25 16:33:33 vrany Exp $'
 ! !