Tools__NavigationState.st
branchjv
changeset 12430 4579351ee2cb
parent 12314 0cbf76168690
child 12650 e0f607754b9a
--- a/Tools__NavigationState.st	Thu Feb 21 16:32:07 2013 +0000
+++ b/Tools__NavigationState.st	Tue Feb 26 12:38:54 2013 +0000
@@ -36,7 +36,8 @@
 		messagePaneView codePaneAndPluginView
 		codePaneAndPluginViewRelativeCorners pluginVisibleHolder
 		bookmarkHolder worker packageInfoBackgroundColorHolder
-		packageInfoButton showMethodTemplate lastMethodShownInCodeView showingParseError'
+		packageInfoButton showMethodTemplate lastMethodShownInCodeView
+		showingParseError'
 	classVariableNames:'CodeAspectTranslations'
 	poolDictionaries:''
 	category:'Interface-Browsers-New'
@@ -1000,7 +1001,26 @@
 
 !
 
-    "bad name- it's a holder, baby"
+selectedClasses
+    "WARNING WARNING:
+    This is overwriten method from SmallSense!!!!!!
+    "
+    selectedClasses isNil ifTrue:[
+        selectedClasses := "SpecialValueHolder with:nil." nil asValue.
+        (ConfigurableFeatures includesFeature:'SmallSenseEnabled') ifTrue:[
+            selectedClasses onChangeEvaluate:[
+                selectedClasses value ? #() do:[:cls|
+                    (Smalltalk at:#SmallSenseManager) instance updateInfoForClass: cls.
+                ].
+            ]
+        ]
+    ].
+    ^ selectedClasses
+
+    "Modified: / 26-02-2013 / 12:29:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+"bad name- it's a holder, baby"
 
 selectedLintRules
     selectedLintRules isNil ifTrue:[
@@ -1711,8 +1731,14 @@
     ^ 'Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.47 2012/11/03 14:22:14 cg Exp '
 !
 
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+!
+
 version_SVN
     ^ '$Id: Tools__NavigationState.st 8083 2013-01-14 11:48:37Z vranyj1 $'
 ! !
 
+
 NavigationState initialize!