11Class {
2- #name : ' ExReqConditionWidget ' ,
2+ #name : ' ExReqBrowseAndCodeWidget ' ,
33 #superclass : ' SpPresenter' ,
44 #instVars : [
55 ' code' ,
@@ -14,43 +14,43 @@ Class {
1414}
1515
1616{ #category : ' accessing' }
17- ExReqConditionWidget >> action [
17+ ExReqBrowseAndCodeWidget >> action [
1818
1919 ^ action
2020]
2121
2222{ #category : ' accessing' }
23- ExReqConditionWidget >> action: aBlock [
23+ ExReqBrowseAndCodeWidget >> action: aBlock [
2424
2525 action := aBlock
2626]
2727
2828{ #category : ' accessing' }
29- ExReqConditionWidget >> button [
29+ ExReqBrowseAndCodeWidget >> button [
3030
3131 ^ button
3232]
3333
3434{ #category : ' accessing' }
35- ExReqConditionWidget >> changeIcon: anIcon [
35+ ExReqBrowseAndCodeWidget >> changeIcon: anIcon [
3636
3737 self button icon: anIcon
3838]
3939
4040{ #category : ' accessing' }
41- ExReqConditionWidget >> changeLabel: aString [
41+ ExReqBrowseAndCodeWidget >> changeLabel: aString [
4242
4343 self label label: aString.
4444]
4545
4646{ #category : ' accessing' }
47- ExReqConditionWidget >> code [
47+ ExReqBrowseAndCodeWidget >> code [
4848
4949 ^ code
5050]
5151
5252{ #category : ' layout' }
53- ExReqConditionWidget >> defaultLayout [
53+ ExReqBrowseAndCodeWidget >> defaultLayout [
5454
5555 ^ SpBoxLayout newVertical
5656 spacing: 4 ;
@@ -67,7 +67,7 @@ ExReqConditionWidget >> defaultLayout [
6767]
6868
6969{ #category : ' initialization - deprecated' }
70- ExReqConditionWidget >> initializePresenter [
70+ ExReqBrowseAndCodeWidget >> initializePresenter [
7171
7272 action := [ ].
7373 code := SpCodePresenter new editable: false ; yourself .
@@ -76,19 +76,19 @@ ExReqConditionWidget >> initializePresenter [
7676]
7777
7878{ #category : ' accessing' }
79- ExReqConditionWidget >> label [
79+ ExReqBrowseAndCodeWidget >> label [
8080
8181 ^ label
8282]
8383
8484{ #category : ' accessing' }
85- ExReqConditionWidget >> model [
85+ ExReqBrowseAndCodeWidget >> model [
8686
8787 ^ model
8888]
8989
9090{ #category : ' accessing' }
91- ExReqConditionWidget >> model: anObject [
91+ ExReqBrowseAndCodeWidget >> model: anObject [
9292
9393 model := anObject
9494]
0 commit comments