RoloLudo/RoloLudo.package/SfTruthOption.class/instance/asWikiText.st

19 lines
525 B
Smalltalk
Raw Normal View History

2021-05-31 02:46:52 +00:00
accessing
asWikiText
| stream |
stream := '' writeStream.
stream
nextPutAll: '<b>';
nextPutAll: self chance first asString, '-', self chance last asString;
nextPutAll: ' | ', self brief;
nextPutAll: '</b>'; cr;
nextPutAll: String cr;
nextPutAll: self details;
nextPutAll: String cr;
nextPutAll: self subtableAsWikiText.
stream
nextPutAll: String cr;
nextPutAll: '<$details summary="Quest Starter">'; cr;
nextPutAll: '//', self questStarter, '//'; cr;
nextPutAll: '</$details>'.
^ stream contents