--- a/Tools__Inspector2.st Tue Dec 23 15:51:55 2014 +0100
+++ b/Tools__Inspector2.st Tue Dec 23 15:56:09 2014 +0100
@@ -1228,7 +1228,7 @@
objectsLanguage := anObject class programmingLanguage.
self evaluationLanguageHolder value:(EvaluationLanguageMap at: objectsLanguage ifAbsent: [ objectsLanguage ]).
"/ Must force update - it can happen that language doesn't change (value is the same)
- "/ buy inspectors are new and thus would use default language to evaluation.
+ "/ but inspectors are new and thus would use default language for evaluation.
self updateEvaluationLanguage.
"Modified: / 27-02-2008 / 12:06:52 / janfrog"
@@ -1314,11 +1314,11 @@
!Inspector2::NavigationState class methodsFor:'documentation'!
version
- ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
!
version_SVN
- ^'$Id: Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^'$Id: Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
! !
!Inspector2::NavigationState methodsFor:'accessing'!
@@ -1442,14 +1442,16 @@
!Inspector2::NavigationState methodsFor:'initialization'!
initializeClassBrowserTab
- | browser spec cls canvas makeView view|
+ |spec makeView view|
- cls := theObject class theNonMetaclass.
"/ spec := #singleClassBrowserSpec.
spec := #multipleClassBrowserSpec.
makeView := [
+ |browser cls canvas|
+
+ cls := theObject class theNonMetaclass.
view isNil ifTrue:[
browser := Tools::NewSystemBrowser new.
browser isEmbeddedBrowser:true.
@@ -1578,19 +1580,19 @@
!Inspector2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
!
version_CVS_jvrany
- ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
!
version_SVN
- ^ '$Id: Tools__Inspector2.st,v 1.57 2014-10-23 11:15:29 cg Exp $'
+ ^ '$Id: Tools__Inspector2.st,v 1.58 2014-12-23 14:56:09 cg Exp $'
! !