equal
deleted
inserted
replaced
615 ! |
615 ! |
616 |
616 |
617 resourceSelectorHolder |
617 resourceSelectorHolder |
618 "returns the value holder for the name of the selector" |
618 "returns the value holder for the name of the selector" |
619 |
619 |
620 |holder| |
620 ^ builder valueAspectFor:#resourceSelectorHolder initialValue:'' |
621 (holder := builder bindingAt:#valueOfResourceSelector) isNil ifTrue:[ |
621 |
622 builder aspectAt:#valueOfResourceSelector put:(holder := '' asValue). |
622 "Modified: / 09-03-2019 / 22:19:19 / Claus Gittinger" |
623 ]. |
|
624 ^ holder |
|
625 ! |
623 ! |
626 |
624 |
627 rootOfClassCategories |
625 rootOfClassCategories |
628 "returns the value holder for the root of the class tree list" |
626 "returns the value holder for the root of the class tree list" |
629 |
627 |
688 ! |
686 ! |
689 |
687 |
690 selectionOfResourceMethod |
688 selectionOfResourceMethod |
691 "returns the value holder for the selected resource method of the resource method list" |
689 "returns the value holder for the selected resource method of the resource method list" |
692 |
690 |
693 |holder| |
691 ^ builder valueAspectFor:#selectionOfResourceMethod initialValue:'' |
694 (holder := builder bindingAt:#selectionOfResourceMethod) isNil ifTrue:[ |
692 |
695 builder aspectAt:#selectionOfResourceMethod put:(holder := '' asValue). |
693 "Modified: / 09-03-2019 / 22:19:30 / Claus Gittinger" |
696 ]. |
|
697 ^ holder |
|
698 ! |
694 ! |
699 |
695 |
700 valueOfClassName |
696 valueOfClassName |
701 <resource: #obsolete> |
697 <resource: #obsolete> |
702 "returns the value holder for the name of the class" |
698 "returns the value holder for the name of the class" |