Adding discourse topics
This commit is contained in:
parent
bdfa072c31
commit
39f8f7ee22
@ -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]
|
@ -0,0 +1,3 @@
|
|||||||
|
accessing
|
||||||
|
discourseTopics: discourseTopicsArray
|
||||||
|
discourseTopics := discourseTopicsArray
|
@ -0,0 +1,3 @@
|
|||||||
|
accessing
|
||||||
|
discourseTopics
|
||||||
|
^ discourseTopics
|
@ -7,7 +7,8 @@
|
|||||||
"classvars" : [ ],
|
"classvars" : [ ],
|
||||||
"instvars" : [
|
"instvars" : [
|
||||||
"users",
|
"users",
|
||||||
"title"
|
"title",
|
||||||
|
"discourseTopics"
|
||||||
],
|
],
|
||||||
"name" : "TwitterUsersGroup",
|
"name" : "TwitterUsersGroup",
|
||||||
"type" : "normal"
|
"type" : "normal"
|
||||||
|
Loading…
Reference in New Issue
Block a user