12 lines
262 B
Smalltalk
12 lines
262 B
Smalltalk
|
utilities
|
||
|
|
abilitiesAsWikiTextFor: abilitiesSubset
|
||
|
|
|
||
|
|
| aStream |
|
||
|
|
aStream := '' writeStream.
|
||
|
|
abilitiesSubset do: [:abi|
|
||
|
|
aStream
|
||
|
|
nextPutAll: ' <li> ⬢'; cr;
|
||
|
|
nextPutAll: ' ';
|
||
|
|
nextPutAll: abi; cr;
|
||
|
|
nextPutAll: ' </li>'; cr ].
|
||
|
|
^ aStream contents
|