Ok now can we have that in Mondrian....
I really want to get source method as fly by help everywhere :)
'khkjhjkhjkhjkh
kjhj
kjhkjhkjh
kjh
kjhkjh kjh jh jh jh jh kjh kjh ' asTextMorph openInWorld inspect
after
self selectAll ; chooseEmphasisOrAlignment
So now for you :)
| t |
t := 'khkjhjkhjkhjkh
kjhj
kjhkjhkjh
kjh
kjhkjh kjh jh jh jh jh kjh kjh ' asTextMorph.
t openInWorld.
t selectAll; changeFormatting: #rightFlush.
t inspect
if you add this little method (which soon will be in your favorite environment) you get
it.
TextMorph>>changeFormatting: aSymbol
"leftFlush centered rightFlush justified "
self editor applyAttribute: (TextAlignment perform: aSymbol).
self updateFromParagraph
Stef