From 118895081d97279a796cc704e6c23bf92ed79e5e Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sat, 30 Mar 2019 21:45:45 -0400 Subject: Re-named "do-template" to "template". --- stdlib/source/program/licentia/output.lux | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'stdlib/source/program/licentia/output.lux') diff --git a/stdlib/source/program/licentia/output.lux b/stdlib/source/program/licentia/output.lux index 29d61dd42..43080697e 100644 --- a/stdlib/source/program/licentia/output.lux +++ b/stdlib/source/program/licentia/output.lux @@ -43,7 +43,7 @@ (def: #export (grant termination) (-> Termination Text) - (`` (format (~~ (do-template [ <content>] + (`` (format (~~ (template [<title> <content>] [($.block ($.section {#$.title <title> #$.content <content>}))] @@ -65,7 +65,7 @@ (def: #export limitation Text - (`` (format (~~ (do-template [<title> <content>] + (`` (format (~~ (template [<title> <content>] [($.block ($.section {#$.title <title> #$.content <content>}))] @@ -80,7 +80,7 @@ (def: #export assurance Text - (`` (format (~~ (do-template [<title> <content>] + (`` (format (~~ (template [<title> <content>] [($.block ($.section {#$.title <title> #$.content <content>}))] @@ -92,7 +92,7 @@ (def: #export (liability value) (-> Liability Text) - (`` (format (~~ (do-template [<title> <condition> <content>] + (`` (format (~~ (template [<title> <condition> <content>] [(if <condition> ($.block ($.section {#$.title <title> #$.content <content>})) @@ -120,7 +120,7 @@ (def: #export (distribution distribution) (-> Distribution Text) - (`` (format (~~ (do-template [<title> <condition> <content>] + (`` (format (~~ (template [<title> <condition> <content>] [(if <condition> ($.block ($.section {#$.title <title> #$.content <content>})) @@ -141,7 +141,7 @@ (def: #export (commercial value) (-> Commercial Text) - (`` (format (~~ (do-template [<title> <condition> <content>] + (`` (format (~~ (template [<title> <condition> <content>] [(if <condition> ($.block ($.section {#$.title <title> #$.content <content>})) @@ -168,7 +168,7 @@ #.None [false ""])] - (`` (format (~~ (do-template [<condition> <title> <content>] + (`` (format (~~ (template [<condition> <title> <content>] [(if <condition> ($.block ($.section {#$.title <title> #$.content <content>})) @@ -210,7 +210,7 @@ (def: #export (miscellaneous identified?) (-> Bit Text) - (`` (format (~~ (do-template [<title> <condition> <content>] + (`` (format (~~ (template [<title> <condition> <content>] [(if <condition> ($.block ($.section {#$.title <title> #$.content <content>})) -- cgit v1.2.3