Adding discourse topics

This commit is contained in:
Offray Vladimir Luna Cárdenas 2021-08-25 09:13:18 -05:00
parent bdfa072c31
commit 39f8f7ee22
4 changed files with 17 additions and 3 deletions

View File

@ -17,6 +17,13 @@ asCardElement
fontSize: 20; fontSize: 20;
foreground: Color black)); foreground: Color black));
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self name; beLargeSize); addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self name; beLargeSize);
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: 'joined: ', self createdAtShorted); addChild: (BrLabel new
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self description)); aptitude: BrGlamorousLabelAptitude; text: 'joined: ', self createdAtShorted);
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self description);
addChild: (BrEditor new
constraintsDo: [ :c |
c horizontal matchParent ];
aptitude: BrGlamorousRegularEditorAptitude new;
beReadOnlyWithSelection;
text: String loremIpsum));
when: BlClickEvent do: [:e | e target phlow spawnObject: self tweets] when: BlClickEvent do: [:e | e target phlow spawnObject: self tweets]

View File

@ -0,0 +1,3 @@
accessing
discourseTopics: discourseTopicsArray
discourseTopics := discourseTopicsArray

View File

@ -0,0 +1,3 @@
accessing
discourseTopics
^ discourseTopics

View File

@ -7,7 +7,8 @@
"classvars" : [ ], "classvars" : [ ],
"instvars" : [ "instvars" : [
"users", "users",
"title" "title",
"discourseTopics"
], ],
"name" : "TwitterUsersGroup", "name" : "TwitterUsersGroup",
"type" : "normal" "type" : "normal"