licenses: Add new meta-license fsf-free.

* guix/licenses.scm (fsf-free): New record with constructor.

1 files changed, 9 insertions, 1 deletions

diff --git a/guix/licenses.scm b/guix/licenses.scm
index c636cc5edf..1b149b5282 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