Re: Texlive

[Andreas Enge <andreas@enge.fr>]

[-- Attachment #1.1: Type: text/plain, Size: 295 bytes --]

Am Dienstag, 5. Februar 2013 schrieb Ludovic Courtès:
> Similar to ‘bsd-style’, what about adding:
>   (define (copyleft url #:optional (comment "")) ...)
>   (define (fsf-free url #:optional (comment "")) ...)

Not sure if we need two of them. Is the attached patch okay?

Andreas

[-- Attachment #1.2: Type: text/html, Size: 1968 bytes --]

[-- Attachment #2: 0001-licenses-Add-new-meta-license-fsf-free.patch --]
[-- Type: text/x-patch, Size: 1227 bytes --]

From e3603d27c42d15e7c90f5130a83b15d5a11239aa Mon Sep 17 00:00:00 2001
From: Andreas Enge <andreas@enge.fr>
Date: Tue, 5 Feb 2013 23:01:14 +0100
Subject: [PATCH] licenses: Add new meta-license fsf-free.

* guix/licenses.scm (fsf-free): New record with constructor.
---
 guix/licenses.scm |   10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/guix/licenses.scm b/guix/licenses.scm
index c636cc5..1b149b5 100644
--- a/guix/licenses.scm
+++ b/guix/licenses.scm
@@ -39,7 +39,8 @@
             qpl
             vim
             x11
-            zlib))
+            zlib
+            fsf-free))
 
 (define-record-type <license>
   (license name uri comment)
@@ -234,4 +235,11 @@ which may be a file:// URI pointing the package's tree."
            "http://www.gzip.org/zlib/zlib_license.html"
            "https://www.gnu.org/licenses/license-list#ZLib"))
 
+(define* (fsf-free uri #:optional (comment ""))
+  "Return a license that does not fit any of the ones above or a collection
+of licenses, approved as free by the FSF.  More details can be found at URI."
+  (license "FSF-free"
+           uri
+           comment))
+
 ;;; licenses.scm ends here
-- 
1.7.10.4