Adding discourse topics
This commit is contained in:
parent
bdfa072c31
commit
39f8f7ee22
@ -17,6 +17,13 @@ asCardElement
|
||||
fontSize: 20;
|
||||
foreground: Color black));
|
||||
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self name; beLargeSize);
|
||||
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: 'joined: ', self createdAtShorted);
|
||||
addChild: (BrLabel new aptitude: BrGlamorousLabelAptitude; text: self description));
|
||||
addChild: (BrLabel new
|
||||
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]
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
discourseTopics: discourseTopicsArray
|
||||
discourseTopics := discourseTopicsArray
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
discourseTopics
|
||||
^ discourseTopics
|
@ -7,7 +7,8 @@
|
||||
"classvars" : [ ],
|
||||
"instvars" : [
|
||||
"users",
|
||||
"title"
|
||||
"title",
|
||||
"discourseTopics"
|
||||
],
|
||||
"name" : "TwitterUsersGroup",
|
||||
"type" : "normal"
|
||||
|
Loading…
Reference in New Issue
Block a user