diff options
Diffstat (limited to '')
| -rw-r--r-- | licentia/source/program/licentia/output.lux | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/licentia/source/program/licentia/output.lux b/licentia/source/program/licentia/output.lux index 7645b2cb4..0f05937e2 100644 --- a/licentia/source/program/licentia/output.lux +++ b/licentia/source/program/licentia/output.lux @@ -47,7 +47,7 @@ (def .public (grant termination) (-> Termination Text) - (`` (format (~~ (with_template [<title> <content>] + (`` (format (,, (with_template [<title> <content>] [($.block ($.section [#$.title <title> #$.content <content>]))] @@ -69,7 +69,7 @@ (def .public limitation Text - (`` (format (~~ (with_template [<title> <content>] + (`` (format (,, (with_template [<title> <content>] [($.block ($.section [#$.title <title> #$.content <content>]))] @@ -84,7 +84,7 @@ (def .public assurance Text - (`` (format (~~ (with_template [<title> <content>] + (`` (format (,, (with_template [<title> <content>] [($.block ($.section [#$.title <title> #$.content <content>]))] @@ -96,7 +96,7 @@ (def .public (liability value) (-> Liability Text) - (`` (format (~~ (with_template [<title> <condition> <content>] + (`` (format (,, (with_template [<title> <condition> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) @@ -124,7 +124,7 @@ (def .public (distribution distribution) (-> Distribution Text) - (`` (format (~~ (with_template [<title> <condition> <content>] + (`` (format (,, (with_template [<title> <condition> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) @@ -145,7 +145,7 @@ (def .public (commercial value) (-> Commercial Text) - (`` (format (~~ (with_template [<title> <condition> <content>] + (`` (format (,, (with_template [<title> <condition> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) @@ -172,7 +172,7 @@ {.#None} [false ""])] - (`` (format (~~ (with_template [<condition> <title> <content>] + (`` (format (,, (with_template [<condition> <title> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) @@ -214,7 +214,7 @@ (def .public (miscellaneous identified?) (-> Bit Text) - (`` (format (~~ (with_template [<title> <condition> <content>] + (`` (format (,, (with_template [<title> <condition> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) |