Tools__Inspector2.st
changeset 10423 8215f496b6de
parent 10392 e4e94b17c0c2
child 10425 c49cba2bd28e
--- a/Tools__Inspector2.st	Fri Jul 29 12:58:00 2011 +0200
+++ b/Tools__Inspector2.st	Fri Jul 29 20:52:25 2011 +0200
@@ -409,9 +409,11 @@
 !
 
 updateWindowLabel
-    |object|
+    |currentItem object|
 
-    object := self navigationHistoryHolder currentItem theObject.
+    (currentItem := self navigationHistoryHolder currentItem) notNil ifTrue:[
+        object := currentItem theObject.
+    ].
     self window label:(InspectorView commonLabelFor:object).
 
     "Created: / 15-07-2011 / 16:25:42 / cg"
@@ -429,7 +431,7 @@
 !Inspector2::NavigationState class methodsFor:'documentation'!
 
 version
-    ^'$Id: Tools__Inspector2.st,v 1.11 2011-07-25 08:51:16 cg Exp $'
+    ^'$Id: Tools__Inspector2.st,v 1.12 2011-07-29 18:52:25 cg Exp $'
 !
 
 version_SVN
@@ -610,7 +612,7 @@
 !Inspector2 class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.11 2011-07-25 08:51:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.12 2011-07-29 18:52:25 cg Exp $'
 !
 
 version_CVS_jvrany