Improving oracles options exportation.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-01-10 18:45:50 -05:00
parent 67be117367
commit 66526fb8da

View File

@ -7,14 +7,14 @@ optionsWikiTextRow: value
nextPutAll: (value at: 'Description'), ' |'. nextPutAll: (value at: 'Description'), ' |'.
value keys size > 1 ifTrue: [ | remaining cell | value keys size > 1 ifTrue: [ | remaining cell |
remaining := value copy removeKey: 'Description'; yourself. remaining := value copy removeKey: 'Description'; yourself.
cell := remaining values. cell := remaining values first.
cell class = Array ifTrue: [ cell class = Array ifTrue: [
cell first doWithIndex: [:each :i | cell doWithIndex: [:each :i |
output nextPutAll: '[[', each asString,']] '. output nextPutAll: '[[', each asString,']]'.
(i % 2 = 1) ifTrue: [output nextPutAll: '; ' ] (i = cell size) ifFalse: [output nextPutAll: '; ' ]
] ]
]. ].
output nextPutAll: '|'. output nextPutAll: ' |'.
]. ].
^ output contents ^ output contents