RoloLudo/RoloLudo.package/SfOracle.class/instance/optionsWikiTextRow..st

20 lines
558 B
Smalltalk
Raw Normal View History

2021-12-05 18:58:22 +00:00
accessing
optionsWikiTextRow: value
| output |
value class = String ifTrue: [ ^ value , '|' ].
output := '' writeStream.
output
nextPutAll: (value at: 'Description'), ' |'.
value keys size > 1 ifTrue: [ | remaining cell |
remaining := value copy removeKey: 'Description'; yourself.
2022-01-10 23:45:50 +00:00
cell := remaining values first.
2021-12-05 18:58:22 +00:00
cell class = Array ifTrue: [
2022-01-10 23:45:50 +00:00
cell doWithIndex: [:each :i |
output nextPutAll: '[[', each asString,']]'.
(i = cell size) ifFalse: [output nextPutAll: '; ' ]
2021-12-05 18:58:22 +00:00
]
].
2022-01-10 23:45:50 +00:00
output nextPutAll: ' |'.
2021-12-05 18:58:22 +00:00
].
^ output contents