diff options
| author | Eduardo Julian | 2021-06-14 18:33:54 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-06-14 18:33:54 -0400 |
| commit | 519c0c0c71cdf7ce3dfc64b9781ab826760b3d94 (patch) | |
| tree | 75fa0672afceff129e5e75afb7a5fed197ce1773 /stdlib/source/program/licentia/license/commercial.lux | |
| parent | af3e6e2cb011dc2ad9204440990731a2f272716d (diff) | |
Extracted Licentia out of the standard library.
Diffstat (limited to 'stdlib/source/program/licentia/license/commercial.lux')
| -rw-r--r-- | stdlib/source/program/licentia/license/commercial.lux | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/stdlib/source/program/licentia/license/commercial.lux b/stdlib/source/program/licentia/license/commercial.lux deleted file mode 100644 index e044baa43..000000000 --- a/stdlib/source/program/licentia/license/commercial.lux +++ /dev/null @@ -1,30 +0,0 @@ -(.module: - [lux #* - [data - ["." text - ["%" format (#+ format)]]]] - ["." // (#+ Commercial) - ["_" term] - [// - ["$" document]]]) - -(def: #export cannot-sell - (let [preamble (format "Without limiting other conditions in " _.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)] - ($.sentence (format preamble - ", " direct-condition - ", " derivative-condition)))) - -(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 - (let [subject (format "The name of no " _.contributor) - capability "endorse or promote products" - source (format "any " _.extension) - condition "specific prior written permission"] - ($.sentence (format subject " may be used to " capability " derived from " source " without " condition)))) |