Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
14
Task/XML-Output/Slate/xml-output.slate
Normal file
14
Task/XML-Output/Slate/xml-output.slate
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
lobby define: #remarks -> (
|
||||
{'April' -> 'Bubbly: I\'m > Tam and <= Emily'.
|
||||
'Tam O\'Shanter' -> 'Burns: "When chapman billies leave the street ..."'.
|
||||
'Emily' -> 'Short & shrift'.
|
||||
} as: Dictionary).
|
||||
|
||||
define: #writer -> (Xml Writer newOn: '' new writer).
|
||||
writer inTag: 'CharacterRemarks' do:
|
||||
[| :w |
|
||||
lobby remarks keysAndValuesDo:
|
||||
[| :name :remark | w inTag: 'Character' do: [| :w | w ; remark] &attributes: {'name' -> name}].
|
||||
].
|
||||
|
||||
inform: writer contents
|
||||
Loading…
Add table
Add a link
Reference in a new issue