diff options
| author | Eduardo Julian | 2022-07-02 05:38:27 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-07-02 05:38:27 -0400 |
| commit | b96beb587c11fcfbce86ce2d62351600cf6cad1b (patch) | |
| tree | c9a558ab1391ac97cb11e8777ea78299f1ab5555 /licentia/source/program | |
| parent | 104130efba46a875eba566384578f8aa8593ad37 (diff) | |
More traditional names for unquoting macros.
Diffstat (limited to 'licentia/source/program')
| -rw-r--r-- | licentia/source/program/licentia/license/addendum.lux | 2 | ||||
| -rw-r--r-- | licentia/source/program/licentia/output.lux | 16 |
2 files changed, 9 insertions, 9 deletions
diff --git a/licentia/source/program/licentia/license/addendum.lux b/licentia/source/program/licentia/license/addendum.lux index fb8be25b6..f5dfb922b 100644 --- a/licentia/source/program/licentia/license/addendum.lux +++ b/licentia/source/program/licentia/license/addendum.lux @@ -17,7 +17,7 @@ (def .public (output value) (-> Addendum Text) - (`` (format (~~ (with_template [<title> <condition> <content>] + (`` (format (,, (with_template [<title> <condition> <content>] [(if <condition> ($.block ($.section [#$.title <title> #$.content <content>])) 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>])) |