aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/licentia/license/commercial.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-06-14 18:33:54 -0400
committerEduardo Julian2021-06-14 18:33:54 -0400
commit519c0c0c71cdf7ce3dfc64b9781ab826760b3d94 (patch)
tree75fa0672afceff129e5e75afb7a5fed197ce1773 /stdlib/source/program/licentia/license/commercial.lux
parentaf3e6e2cb011dc2ad9204440990731a2f272716d (diff)
Extracted Licentia out of the standard library.
Diffstat (limited to '')
-rw-r--r--licentia/source/program/licentia/license/commercial.lux (renamed from stdlib/source/program/licentia/license/commercial.lux)14
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/program/licentia/license/commercial.lux b/licentia/source/program/licentia/license/commercial.lux
index e044baa43..a17acdbb3 100644
--- a/stdlib/source/program/licentia/license/commercial.lux
+++ b/licentia/source/program/licentia/license/commercial.lux
@@ -8,21 +8,21 @@
[//
["$" document]]])
-(def: #export cannot-sell
+(def: #export cannot_sell
(let [preamble (format "Without limiting other conditions in " _.license)
- direct-condition (format "the grant of rights under " _.license
+ direct_condition (format "the grant of rights under " _.license
" will not include, and does not grant to " _.recipient
", the right to " _.sell " " _.work)
- derivative-condition (format "or any " _.derivative-work)]
+ derivative_condition (format "or any " _.derivative_work)]
($.sentence (format preamble
- ", " direct-condition
- ", " derivative-condition))))
+ ", " direct_condition
+ ", " derivative_condition))))
-(def: #export require-contributor-attribution
+(def: #export require_contributor_attribution
($.sentence (format "All advertising materials mentioning features or use of " _.work
" must include an acknowledgement of the authorship of every " _.contributor)))
-(def: #export disallow-contributor-endorsement
+(def: #export disallow_contributor_endorsement
(let [subject (format "The name of no " _.contributor)
capability "endorse or promote products"
source (format "any " _.extension)