--- 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