detached/2 #2
@ -18,7 +18,7 @@ asCardElement
|
|||||||
margin: (BlInsets left: 20);
|
margin: (BlInsets left: 20);
|
||||||
addChild: (BrLabel new
|
addChild: (BrLabel new
|
||||||
aptitude: BrGlamorousLabelAptitude;
|
aptitude: BrGlamorousLabelAptitude;
|
||||||
text: '@' , self getUser userName , ' | ' , self created asString;
|
text: '@' , self user userName , ' | ' , self created asString;
|
||||||
beSmallSize);
|
beSmallSize);
|
||||||
addChild: anEditor.
|
addChild: anEditor.
|
||||||
buttonsPane := BrHorizontalPane new
|
buttonsPane := BrHorizontalPane new
|
||||||
@ -42,7 +42,7 @@ asCardElement
|
|||||||
hMatchParent;
|
hMatchParent;
|
||||||
vFitContent;
|
vFitContent;
|
||||||
addChildren: {
|
addChildren: {
|
||||||
(self getUser profileImage asElement asScalableElement size: 64 @ 64).
|
(self user profileImage asElement asScalableElement size: 64 @ 64).
|
||||||
BrVerticalPane new
|
BrVerticalPane new
|
||||||
cellSpacing: 5;
|
cellSpacing: 5;
|
||||||
hMatchParent;
|
hMatchParent;
|
||||||
|
@ -1,5 +0,0 @@
|
|||||||
accessing
|
|
||||||
getUser
|
|
||||||
self user
|
|
||||||
ifNotNil: [ ^ self user ].
|
|
||||||
^ self userFromId: authorId
|
|
@ -1,3 +1,4 @@
|
|||||||
accessing
|
accessing
|
||||||
user
|
user
|
||||||
^ user
|
self user ifNotNil: [ ^ self user ].
|
||||||
|
^ self userFromId: authorId
|
Loading…
Reference in New Issue
Block a user