Marcel Taeumel uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-mt.273.mcz==================== Summary ====================
Name: MorphicExtras-mt.273
Author: mt
Time: 5 March 2020, 1:24:04.938611 pm
UUID: 9319611d-7c5b-fe48-b559-f7c85529475c
Ancestors: MorphicExtras-mt.272
Use the current way to transform Text into an HTML string.
=============== Diff against MorphicExtras-mt.272 ===============
Item was changed:
----- Method: FancyMailComposition>>completeTheMessage (in category 'actions') -----
completeTheMessage
| newText strm |
textFields do: [ :each | each hasUnacceptedEdits ifTrue: [ each accept ] ].
newText := String new: 200.
strm := WriteStream on: newText.
strm
nextPutAll: 'Content-Type: text/html'; cr;
nextPutAll: 'From: ', MailSender userName; cr;
nextPutAll: 'To: ',to; cr;
nextPutAll: 'Subject: ',subject; cr;
cr;
nextPutAll: '<HTML><BODY><BR>';
+ nextPutAll: messageText asStringToHtml;
- nextPutAll: messageText asString asHtml;
nextPutAll: '<BR><BR>',theLinkToInclude,'<BR></BODY></HTML>'.
^strm contents
!
Locked
