--- a/Tools__Inspector2Tab.st Thu Nov 09 09:54:14 2017 +0100
+++ b/Tools__Inspector2Tab.st Thu Nov 09 10:04:43 2017 +0100
@@ -41,11 +41,11 @@
toBrowseClass:aClass selector:initialSelectorOrNil label:label
"create and return an inspector tab containing
a browser on aClass (and optional initialSelector).
- This is a utility to be used by inspector2TabXXX methods, which want to embed a clas browser."
-
+ This is a utility to be used by inspector2TabXXX methods, which want to embed a class browser."
+
|makeView view|
- makeView :=
+ makeView :=
[
|spec browser navigationState canvas|
@@ -74,7 +74,7 @@
browser sortByNameAndInheritance value:true.
browser
selectClass:aClass;
- selectProtocol: (Tools::BrowserList nameListEntryForALL).
+ selectProtocol: (Tools::BrowserList nameListEntryForALL).
browser switchToClass:aClass selector:initialSelectorOrNil updateHistory: false.
view := ApplicationSubView new client: browser spec: spec.
"/ sigh must be done after postbuild
@@ -94,6 +94,7 @@
"
"Modified: / 11-02-2017 / 10:17:40 / cg"
+ "Modified (format): / 09-11-2017 / 09:59:28 / mawalch"
! !
!Inspector2Tab methodsFor:'accessing'!