story: rename door sample to tale

This commit is contained in:
Yaseen 2022-01-15 23:26:33 -05:00
parent b37fd09fab
commit e5642b5ff3

View File

@ -1,5 +1,5 @@
|_ story=(map tako:clay [title=@t body=@t])
++ grad %mime ++ grad %mime
|_ tale=(map tako:clay [title=@t body=@t])
:: ::
++ grow :: convert to ++ grow :: convert to
|% :: |% ::
@ -7,9 +7,8 @@
[/text/x-urb-story (as-octs:mimes:html (of-wain:format txt))] [/text/x-urb-story (as-octs:mimes:html (of-wain:format txt))]
++ txt ++ txt
^- wain ^- wain
:: TODO better code style?
%+ snoc :: ensure terminating newline is present %+ snoc :: ensure terminating newline is present
%+ turn ~(tap by story) %+ turn ~(tap by tale)
|= [chapter=[tak=tako:clay message=[title=@t body=@t]]] |= [chapter=[tak=tako:clay message=[title=@t body=@t]]]
=/ tak=tako:clay tak.chapter =/ tak=tako:clay tak.chapter
=/ [title=@t body=@t] +.chapter =/ [title=@t body=@t] +.chapter