From 3314396138ce4c3bc21fdf1222f124b7e4509d7a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Cl=C3=A9ment=20Lassieur?= Date: Mon, 1 May 2017 12:01:06 +0200 Subject: [PATCH] licenses: Add new meta-license fsdg-compatible. * guix/licenses.scm (fsdg-compatible): New record with constructor. --- guix/licenses.scm | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/guix/licenses.scm b/guix/licenses.scm index 7b2ac2d311..7a1e2415e6 100644 --- a/guix/licenses.scm +++ b/guix/licenses.scm @@ -9,6 +9,7 @@ ;;; Copyright © 2016 Fabian Harfert ;;; Copyright © 2016 Rene Saavedra ;;; Copyright © 2016, 2017 ng0 +;;; Copyright © 2017 Clément Lassieur ;;; ;;; This file is part of GNU Guix. ;;; @@ -75,7 +76,8 @@ (define-module (guix licenses) zpl2.1 zlib fsf-free - wtfpl2)) + wtfpl2 + fsdg-compatible)) (define-record-type (license name uri comment) @@ -488,4 +490,13 @@ (define* (fsf-free uri #:optional (comment "")) uri 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