Tools__Inspector2.st
changeset 15184 f20011c9afc6
parent 15178 8cf5ae14559b
child 15282 18ce7c39bd7d
--- a/Tools__Inspector2.st	Wed Feb 04 16:02:45 2015 +0100
+++ b/Tools__Inspector2.st	Wed Feb 04 16:25:50 2015 +0100
@@ -1222,7 +1222,7 @@
 inspect:anObject 
     | objectsLanguage |
 
-    self navigationHistoryHolder currentItem:(NavigationState for:anObject).
+    self navigationHistoryHolder currentItem:(self navigationStateFor: anObject).
     self window notNil ifTrue:[
         self updateWindowLabel
     ].
@@ -1235,7 +1235,7 @@
     "Modified: / 27-02-2008 / 12:06:52 / janfrog"
     "Modified: / 15-07-2011 / 16:26:03 / cg"
     "Modified (format): / 19-08-2011 / 09:01:20 / cg"
-    "Modified (comment): / 12-08-2014 / 20:04:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-02-2015 / 15:27:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 openOn: anObject
@@ -1271,6 +1271,12 @@
 
 !Inspector2 methodsFor:'private'!
 
+navigationStateFor: anObject
+    ^ NavigationState for: anObject
+
+    "Created: / 04-02-2015 / 15:27:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 setDoItActionForLanguage: language
 
 
@@ -1315,11 +1321,11 @@
 !Inspector2::NavigationState class methodsFor:'documentation'!
 
 version
-    ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 !
 
 version_SVN
-    ^'$Id: Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^'$Id: Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 ! !
 
 !Inspector2::NavigationState methodsFor:'accessing'!
@@ -1506,19 +1512,19 @@
 !Inspector2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 !
 
 version_CVS_jvrany
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__Inspector2.st,v 1.59 2015-02-03 11:20:17 vrany Exp $'
+    ^ '$Id: Tools__Inspector2.st,v 1.60 2015-02-04 15:25:50 vrany Exp $'
 ! !