mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-15 07:27:48 -05:00
licenses: Add new meta-license fsdg-compatible.
* guix/licenses.scm (fsdg-compatible): New record with constructor.
This commit is contained in:
parent
78df8948c8
commit
3314396138
1 changed files with 12 additions and 1 deletions
|
@ -9,6 +9,7 @@
|
||||||
;;; Copyright © 2016 Fabian Harfert <fhmgufs@web.de>
|
;;; Copyright © 2016 Fabian Harfert <fhmgufs@web.de>
|
||||||
;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org>
|
;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org>
|
||||||
;;; Copyright © 2016, 2017 ng0 <ng0@libertad.pw>
|
;;; Copyright © 2016, 2017 ng0 <ng0@libertad.pw>
|
||||||
|
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -75,7 +76,8 @@ (define-module (guix licenses)
|
||||||
zpl2.1
|
zpl2.1
|
||||||
zlib
|
zlib
|
||||||
fsf-free
|
fsf-free
|
||||||
wtfpl2))
|
wtfpl2
|
||||||
|
fsdg-compatible))
|
||||||
|
|
||||||
(define-record-type <license>
|
(define-record-type <license>
|
||||||
(license name uri comment)
|
(license name uri comment)
|
||||||
|
@ -488,4 +490,13 @@ (define* (fsf-free uri #:optional (comment ""))
|
||||||
uri
|
uri
|
||||||
comment))
|
comment))
|
||||||
|
|
||||||
|
(define* (fsdg-compatible uri #:optional (comment ""))
|
||||||
|
"Return a license that does not fit any of the ones above or a collection
|
||||||
|
of licenses, not necessarily free, but in accordance with FSDG as Non-functional
|
||||||
|
Data. More details can be found at URI. See also
|
||||||
|
https://www.gnu.org/distros/free-system-distribution-guidelines.en.html#non-functional-data."
|
||||||
|
(license "FSDG-compatible"
|
||||||
|
uri
|
||||||
|
comment))
|
||||||
|
|
||||||
;;; licenses.scm ends here
|
;;; licenses.scm ends here
|
||||||
|
|
Loading…
Reference in a new issue