From 519c0c0c71cdf7ce3dfc64b9781ab826760b3d94 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Jun 2021 18:33:54 -0400
Subject: Extracted Licentia out of the standard library.

---
 .../source/program/licentia/license/commercial.lux | 30 ----------------------
 1 file changed, 30 deletions(-)
 delete mode 100644 stdlib/source/program/licentia/license/commercial.lux

(limited to 'stdlib/source/program/licentia/license/commercial.lux')

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))))
-- 
cgit v1.2.3