blob: 3fb986351b8845de5b7101cdd147f50c5d3ec70c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
(.module:
[library
[lux "*"
[data
["[0]" text
["%" format {"+" [format]}]]]]]
[//
["_" term]
[//
["$" document]]])
(def: .public contribution
(let [on-submissions (let [exception (format "Unless " _.recipient " explicitly states otherwise")
general-case (format "any intentional " _.submission " of a " _.contribution
" for inclusion in " _.licensed_work
" by " _.recipient
" to " _.licensor
" shall be under the terms and conditions of " _.license)
guard "without any additional terms or conditions"]
(format exception ", " general-case ", " guard))
on-special-cases (let [connection "Notwithstanding the above"
prioritization (format "nothing herein shall supersede or modify the terms of any separate license agreement " _.recipient
" may have executed with " _.licensor
" regarding such " _.contribution)]
(format connection ", " prioritization))]
($.paragraph (list on-submissions
on-special-cases))))
|
