licenses: Add new meta-license fsf-free.

* guix/licenses.scm (fsf-free): New record with constructor.
This commit is contained in:
Andreas Enge 2013-02-05 23:01:14 +01:00
parent a6ef51e378
commit 6d36a6f3b0
1 changed files with 9 additions and 1 deletions

View File

@ -39,7 +39,8 @@
qpl qpl
vim vim
x11 x11
zlib)) zlib
fsf-free))
(define-record-type <license> (define-record-type <license>
(license name uri comment) (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" "http://www.gzip.org/zlib/zlib_license.html"
"https://www.gnu.org/licenses/license-list#ZLib")) "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 ;;; licenses.scm ends here