#DOCUMENTATION
class: Tools::OrganizerCanvas
comment/format in:10 methods
changed: #updateProjectSelectionFromClasses
--- a/Tools__OrganizerCanvas.st Fri Mar 25 17:07:40 2016 +0100
+++ b/Tools__OrganizerCanvas.st Fri Mar 25 17:08:35 2016 +0100
@@ -3341,16 +3341,11 @@
nameSpaceListMenuHolder
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#nameSpaceListMenuHolder) isNil ifTrue:[
- holder := ValueHolder new.
- builder aspectAt:#nameSpaceListMenuHolder put:holder.
-"/ holder addDependent:self.
+ holder := ValueHolder new.
+ builder aspectAt:#nameSpaceListMenuHolder put:holder.
].
^ holder.
@@ -3369,16 +3364,12 @@
nameSpaceListWidgetHolder
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#nameSpaceListWidgetHolder) isNil ifTrue:[
- holder := ValueHolder new.
- builder aspectAt:#nameSpaceListWidgetHolder put:holder.
- holder value:(self nameSpaceListWidget).
+ holder := ValueHolder new.
+ builder aspectAt:#nameSpaceListWidgetHolder put:holder.
+ holder value:(self nameSpaceListWidget).
].
^ holder.
!
@@ -3408,16 +3399,11 @@
outGeneratorHolder
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#outGeneratorHolder) isNil ifTrue:[
- holder := ValueHolder new.
- builder aspectAt:#outGeneratorHolder put:holder.
-"/ holder addDependent:self.
+ holder := ValueHolder new.
+ builder aspectAt:#outGeneratorHolder put:holder.
].
^ holder.
@@ -3453,16 +3439,11 @@
projectDoubleClickChannel
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#projectDoubleClickChannel) isNil ifTrue:[
- holder := TriggerValue new.
- builder aspectAt:#projectDoubleClickChannel put:holder.
-"/ holder addDependent:self.
+ holder := TriggerValue new.
+ builder aspectAt:#projectDoubleClickChannel put:holder.
].
^ holder.
!
@@ -3470,13 +3451,8 @@
projectListMenuHolder
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
projectListMenuHolder isNil ifTrue:[
- projectListMenuHolder := ValueHolder new.
-"/ projectListMenuHolder addDependent:self.
+ projectListMenuHolder := ValueHolder new.
].
^ projectListMenuHolder.
@@ -3486,13 +3462,8 @@
selectedCategories
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
selectedCategories isNil ifTrue:[
- selectedCategories := ValueHolder new.
-"/ selectedCategories addDependent:self.
+ selectedCategories := ValueHolder new.
].
^ selectedCategories.
@@ -3660,16 +3631,11 @@
variableDoubleClickChannel
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#variableDoubleClickChannel) isNil ifTrue:[
- holder := TriggerValue new.
- builder aspectAt:#variableDoubleClickChannel put:holder.
-"/ holder addDependent:self.
+ holder := TriggerValue new.
+ builder aspectAt:#variableDoubleClickChannel put:holder.
].
^ holder.
!
@@ -3686,13 +3652,8 @@
variablesMenuHolder
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
variablesMenuHolder isNil ifTrue:[
- variablesMenuHolder := ValueHolder new.
-"/ variablesMenuHolder addDependent:self.
+ variablesMenuHolder := ValueHolder new.
].
^ variablesMenuHolder.
@@ -4561,16 +4522,11 @@
nameSpaceListUpdateTrigger
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#nameSpaceListUpdateTrigger) isNil ifTrue:[
- holder := TriggerValue new.
- builder aspectAt:#nameSpaceListUpdateTrigger put:holder.
-"/ holder addDependent:self.
+ holder := TriggerValue new.
+ builder aspectAt:#nameSpaceListUpdateTrigger put:holder.
].
^ holder.
@@ -4581,16 +4537,11 @@
projectListUpdateTrigger
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
-
|holder|
(holder := builder bindingAt:#projectListUpdateTrigger) isNil ifTrue:[
- holder := TriggerValue new.
- builder aspectAt:#projectListUpdateTrigger put:holder.
-"/ holder addDependent:self.
+ holder := TriggerValue new.
+ builder aspectAt:#projectListUpdateTrigger put:holder.
].
^ holder.
@@ -5125,9 +5076,9 @@
selectedProjects := self selectedProjects value.
oldSelectedProjects := ((selectedProjects ? #()) collect:[:pkg | pkg string] as:Set).
- variableFilter value:nil.
- packageFilter value:nil.
- nameSpaceFilter value:nil.
+ self variableFilter value:nil.
+ self packageFilter value:nil.
+ self nameSpaceFilter value:nil.
selectedProjects := Set new.
"/ project-selection feedBack;
@@ -5245,10 +5196,10 @@
!OrganizerCanvas class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.62 2015-03-19 15:14:04 cg Exp $'
+ ^ '$Header$'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__OrganizerCanvas.st,v 1.62 2015-03-19 15:14:04 cg Exp $'
+ ^ '$Header$'
! !