#REFACTORING by cg
class: ResourceSelectionBrowser
code saving
changed:
#resourceSelectorHolder
#selectionOfResourceMethod
--- a/ResourceSelectionBrowser.st Sat Mar 09 22:01:11 2019 +0100
+++ b/ResourceSelectionBrowser.st Sat Mar 09 22:22:59 2019 +0100
@@ -617,11 +617,9 @@
resourceSelectorHolder
"returns the value holder for the name of the selector"
- |holder|
- (holder := builder bindingAt:#valueOfResourceSelector) isNil ifTrue:[
- builder aspectAt:#valueOfResourceSelector put:(holder := '' asValue).
- ].
- ^ holder
+ ^ builder valueAspectFor:#resourceSelectorHolder initialValue:''
+
+ "Modified: / 09-03-2019 / 22:19:19 / Claus Gittinger"
!
rootOfClassCategories
@@ -690,11 +688,9 @@
selectionOfResourceMethod
"returns the value holder for the selected resource method of the resource method list"
- |holder|
- (holder := builder bindingAt:#selectionOfResourceMethod) isNil ifTrue:[
- builder aspectAt:#selectionOfResourceMethod put:(holder := '' asValue).
- ].
- ^ holder
+ ^ builder valueAspectFor:#selectionOfResourceMethod initialValue:''
+
+ "Modified: / 09-03-2019 / 22:19:30 / Claus Gittinger"
!
valueOfClassName