Fixed `Tools::NewSystemBrowser>>selectedNonEmptyEnvironment` for profiler view jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Thu, 23 Feb 2017 12:36:14 +0000
branchjv
changeset 17460 79ad395633e4
parent 17459 9f54cb54204c
child 17461 83feab5a7b8d
Fixed `Tools::NewSystemBrowser>>selectedNonEmptyEnvironment` for profiler view
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Feb 09 09:56:47 2017 +0000
+++ b/Tools__NewSystemBrowser.st	Thu Feb 23 12:36:14 2017 +0000
@@ -19306,6 +19306,9 @@
     type == #multipleClassBrowserSpec ifTrue:[
         ^ self selectedCodeComponentsUsing: #(selectedSelectorsAsEnvironment selectedProtocolsAsEnvironment selectedClassesAsEnvironment)
     ].    
+    type == #visualProfilerSpec ifTrue:[ 
+        ^ self selectedCodeComponentsUsing: #(selectedSelectorsAsEnvironment)
+    ].
     "Add more..."
 
     self breakPoint: #jv.
@@ -19313,7 +19316,7 @@
     ^ self selectedCodeComponentsUsing: #(selectedSelectorsAsEnvironment selectedProtocolsAsEnvironment selectedClassesAsEnvironment)
 
     "Created: / 02-04-2014 / 11:38:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 02-09-2015 / 21:35:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-02-2017 / 22:39:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 selectedNonEmptyEnvironmentFrom: environmentsOrSelectors