D119251: Do not show namespace filter for environments which have no namespaces
...such as JBrowserClassEnvironment.
--- a/Tools__OrganizerCanvas.st Tue Mar 03 12:08:59 2015 +0100
+++ b/Tools__OrganizerCanvas.st Tue Mar 03 12:23:09 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2000 by eXept Software AG
All Rights Reserved
@@ -34,7 +36,7 @@
sortVariablesByName showAllClassesInNameSpaceView
showMethodInheritance showMethodComplexity showMethodTypeIcon
methodVisibilityHolder showCoverageInformation
- sortByNameAndInheritance'
+ sortByNameAndInheritance nameSpaceListWidgetVisibleHolder'
classVariableNames:''
poolDictionaries:''
category:'Interface-Browsers-New'
@@ -2113,6 +2115,7 @@
(ExtendedComboBoxSpec
name: 'NameSpaceFilterComboBox'
layout: (LayoutFrame 0 0 -25 1 0 1 0 1)
+ visibilityChannel: nameSpaceListWidgetVisibleHolder
tabable: true
model: nameSpaceFilterSelectedNameSpace
menuWidgetHolder: nameSpaceListWidgetHolder
@@ -2414,11 +2417,11 @@
(SubChannelInfoSpec
subAspect: sortVariablesByName
aspect: sortVariablesByName
- )
+ )
(SubChannelInfoSpec
subAspect: slaveMode
aspect: classListSlaveMode
- )
+ )
)
createNewApplication: true
createNewBuilder: true
@@ -4739,6 +4742,20 @@
"Modified: / 08-03-2007 / 23:02:15 / cg"
!
+nameSpaceListWidgetVisibleHolder
+ |holder|
+
+ (holder := builder bindingAt:#nameSpaceListWidgetVisibleHolder) isNil ifTrue:[
+ holder := BlockValue
+ with:[:env | env hasNameSpaces ]
+ argument:(self environmentHolder).
+ builder aspectAt:#nameSpaceListWidgetVisibleHolder put: holder
+ ].
+ ^ holder
+
+ "Modified: / 03-03-2015 / 11:24:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
packageDiagramShown
|holder|
@@ -5231,10 +5248,10 @@
!OrganizerCanvas class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.60 2015-02-13 11:15:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.61 2015-03-03 11:23:09 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.60 2015-02-13 11:15:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.61 2015-03-03 11:23:09 vrany Exp $'
! !