Use ‘license:’ #:prefix in (gnu packages language).

* gnu/packages/language.scm: Import (guix licenses) with a
‘license:’ #:prefix.  Adjust all references.
This commit is contained in:
Tobias Geerinckx-Rice 2021-03-06 16:00:04 +01:00
parent 3954674245
commit cfcf9dea39
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -61,9 +61,7 @@ (define-module (gnu packages language)
#:use-module (guix build-system perl)
#:use-module (guix build-system python)
#:use-module (guix build-system qt)
#:use-module ((guix licenses)
#:select
(bsd-3 gpl2 gpl2+ gpl3 gpl3+ lgpl2.1 lgpl2.1+ lgpl3+ perl-license zpl2.1 fdl1.2+))
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix utils))
@ -198,7 +196,7 @@ (define-public nimf
framework. This package provides a fork of the original nimf project, that
focusses especially on Korean input (Hangul, Hanja, ...).")
(home-page "https://github.com/hamonikr/nimf/")
(license lgpl3+)))
(license license:lgpl3+)))
(define-public hime
(package
@ -262,12 +260,8 @@ (define-public hime
including Cangjie, Zhuyin, Dayi, Ranked, Shrimp, Greek, Anthy, Korean, Latin,
Random Cage Fighting Birds, Cool Music etc.")
(home-page "http://hime-ime.github.io/")
(license
(list
gpl2+
lgpl2.1+
;; Documentation
fdl1.2+))))
(license (list license:gpl2+ license:lgpl2.1+
license:fdl1.2+)))) ; documentation
(define-public libchewing
(package
@ -328,7 +322,7 @@ (define-public libchewing
(description "Chewing is an intelligent phonetic (Zhuyin/Bopomofo) input
method, one of the most popular choices for Traditional Chinese users.")
(home-page "http://chewing.im/")
(license lgpl2.1+)))
(license license:lgpl2.1+)))
(define-public liblouis
(package
@ -380,8 +374,8 @@ (define-public liblouis
tables are also included. Liblouis also supports math braille, Nemeth and
Marburg.")
(home-page "http://liblouis.org/")
(license (list lgpl2.1+ ; library
gpl3+)))) ; tools
(license (list license:lgpl2.1+ ; library
license:gpl3+)))) ; tools
(define-public liblouisutdml
(package
@ -421,8 +415,8 @@ (define-public liblouisutdml
appropriate braille codes and formats according to its style sheet and the
specifications in the document.")
(home-page "http://liblouis.org/")
(license (list lgpl3+ ; library
gpl3+)))) ; tools
(license (list license:lgpl3+ ; library
license:gpl3+)))) ; tools
(define-public libstemmer
(package
@ -459,7 +453,7 @@ (define-public libstemmer
(description "LibStemmer provides stemming library, supporting several
languages.")
(home-page "https://snowballstem.org/")
(license bsd-3)))
(license license:bsd-3)))
(define-public perl-lingua-en-findnumber
(package
@ -481,7 +475,7 @@ (define-public perl-lingua-en-findnumber
(description "This module provides a regular expression for finding
numbers in English text. It also provides functions for extracting and
manipulating such numbers.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-en-inflect
(package
@ -504,7 +498,7 @@ (define-public perl-lingua-en-inflect
words. Plural forms of all nouns, most verbs, and some adjectives are
provided. Where appropriate, \"classical\" variants (for example: \"brother\"
-> \"brethren\", \"dogma\" -> \"dogmata\", etc.) are also provided.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-en-inflect-number
(package
@ -526,7 +520,7 @@ (define-public perl-lingua-en-inflect-number
(description "This module extends the functionality of Lingua::EN::Inflect
with three new functions for determining plurality of a word and forcefully
converting a word to singular or plural.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-en-inflect-phrase
(package
@ -553,7 +547,7 @@ (define-public perl-lingua-en-inflect-phrase
(synopsis "Inflect short English phrases")
(description "This module attempts to pluralize or singularize short
English phrases.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-en-number-isordinal
(package
@ -577,7 +571,7 @@ (define-public perl-lingua-en-number-isordinal
(synopsis "Detect if English number is ordinal or cardinal")
(description "This module will tell you if a number, either in words or as
digits, is a cardinal or ordinal number.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-en-tagger
(package
@ -607,7 +601,7 @@ (define-public perl-lingua-en-tagger
to word morphology or can be set to be treated as nouns or other parts of
speech. The tagger also extracts as many nouns and noun phrases as it can,
using a set of regular expressions.")
(license gpl3)))
(license license:gpl3)))
(define-public perl-lingua-en-words2nums
(package
@ -626,7 +620,7 @@ (define-public perl-lingua-en-words2nums
(synopsis "Convert English text to numbers")
(description "This module converts English text into numbers. It supports
both ordinal and cardinal numbers, negative numbers, and very large numbers.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-pt-stemmer
(package
@ -646,7 +640,7 @@ (define-public perl-lingua-pt-stemmer
(description "This module implements a Portuguese stemming algorithm
proposed in the paper A Stemming Algorithm for the Portuguese Language by
Moreira, V. and Huyck, C.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-stem
(package
@ -676,7 +670,7 @@ (define-public perl-lingua-stem
(synopsis "Stemming of words in various languages")
(description "This routine applies stemming algorithms to its parameters,
returning the stemmed words as appropriate to the selected locale.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-stem-fr
(package
@ -695,7 +689,7 @@ (define-public perl-lingua-stem-fr
(synopsis "Porter's stemming algorithm for French")
(description "This module uses a modified version of the Porter Stemming
Algorithm to return a stemmed French word.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-stem-it
(package
@ -714,7 +708,7 @@ (define-public perl-lingua-stem-it
(synopsis "Porter's stemming algorithm for Italian")
(description "This module applies the Porter Stemming Algorithm to its
parameters, returning the stemmed Italian word.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-stem-ru
(package
@ -733,7 +727,7 @@ (define-public perl-lingua-stem-ru
(synopsis "Porter's stemming algorithm for Russian")
(description "This module applies the Porter Stemming Algorithm to its
parameters, returning the stemmed Russian (KOI8-R only) word.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-lingua-stem-snowball-da
(package
@ -753,7 +747,7 @@ (define-public perl-lingua-stem-snowball-da
(description "Lingua::Stem::Snowball::Da is a perl port of the danish
stemmer at http://snowball.sourceforge.net, it was originally altered from the
Lingua::Stem::Snowball::Se.")
(license gpl2)))
(license license:gpl2)))
(define-public perl-snowball-norwegian
(package
@ -773,7 +767,7 @@ (define-public perl-snowball-norwegian
(synopsis "Porters stemming algorithm for Norwegian")
(description "Lingua::Stem::Snowball::No is a perl port of the norwegian
stemmer at http://snowball.tartarus.org.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-snowball-swedish
(package
@ -793,7 +787,7 @@ (define-public perl-snowball-swedish
(synopsis "Porters stemming algorithm for Swedish")
(description "Lingua::Stem::Snowball::Se is a perl port of the swedish
stemmer at http://snowball.sourceforge.net.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-string-toidentifier-en
(package
@ -819,7 +813,7 @@ (define-public perl-string-toidentifier-en
subset of \"\\w\" for use as an identifier in a computer program. The intent
is to make unique identifier names from which the content of the original
string can be easily inferred by a human just by reading the identifier.")
(license perl-license)))
(license license:perl-license)))
(define-public perl-text-german
(package
@ -838,7 +832,7 @@ (define-public perl-text-german
(synopsis "German grundform reduction")
(description "This module is a rather incomplete implementation of work
done by Gudrun Putze-Meier.")
(license perl-license)))
(license license:perl-license)))
(define* (tegaki-release-uri proj version
#:optional (ext "tar.gz"))
@ -905,7 +899,7 @@ (define-public python2-tegaki-wagomu
modern implementation of handwriting recognition software, specifically
designed for Chinese (simplified and traditional) and Japanese, and that is
suitable for both the desktop and mobile devices.")
(license gpl2+))) ; all files
(license license:gpl2+))) ; all files
(define-public python2-tegaki-python
(package
@ -950,9 +944,9 @@ (define-public python2-tegaki-python
("python2-zinnia" ,python2-zinnia)))
(synopsis
"Chinese and Japanese Handwriting Recognition (Base python library)")
(license (list gpl2+ ; all files except...
bsd-3 ; dictutils.py
zpl2.1)))) ; minjson.py
(license (list license:gpl2+ ; all files except...
license:bsd-3 ; dictutils.py
license:zpl2.1)))) ; minjson.py
(define-public python2-tegaki-pygtk
(package
@ -988,7 +982,7 @@ (define-public python2-tegaki-pygtk
`(("python2-pygtk" ,python2-pygtk)
("python2-tegaki-python" ,python2-tegaki-python)))
(synopsis "Chinese and Japanese Handwriting Recognition (Base UI library)")
(license gpl2+))) ; all files
(license license:gpl2+)))
(define-public python2-tegaki-tools
(package
@ -1015,7 +1009,7 @@ (define-public python2-tegaki-tools
(synopsis "Chinese and Japanese Handwriting Recognition (Advanced tools)")
;; Files in gifenc/ are licensed under gpl3+ while other files are licensed
;; under gpl2+. Therefore, the combined work is licensed under gpl3+.
(license gpl3+)))
(license license:gpl3+)))
(define-public python2-tegaki-recognize
(let ((commit "eceec69fe651d0733c8c8752dae569d2283d0f3c")
@ -1067,7 +1061,7 @@ (define-public python2-tegaki-recognize
"--root=/")
#t))))))
(synopsis "Chinese and Japanese Handwriting Recognition (Main program)")
(license gpl2+)))) ; all files
(license license:gpl2+))))
(define-public tegaki-zinnia-japanese
(package
@ -1104,7 +1098,7 @@ (define-public tegaki-zinnia-japanese
(variable "TEGAKI_MODEL_PATH")
(files '("share/tegaki/models")))))
(synopsis "Chinese and Japanese Handwriting Recognition (Model)")
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-japanese-light
(package
@ -1120,7 +1114,7 @@ (define-public tegaki-zinnia-japanese-light
"0x0fs29ylqzxd6xvg51h7rigpbisd7q8v11df425ib2j792yfyf8"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-japanese-kyoiku
(package
@ -1136,7 +1130,7 @@ (define-public tegaki-zinnia-japanese-kyoiku
"0am94bcpmbzplxdnwn9gk15sgaizvcfhmv13mk14jjvx3419cvvx"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-japanese-joyo
(package
@ -1152,7 +1146,7 @@ (define-public tegaki-zinnia-japanese-joyo
"1v0j40lzdyiz01ayws0b8r7fsdy2mr32658382kz4wyk883wzx2z"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-simplified-chinese
(package
@ -1168,7 +1162,7 @@ (define-public tegaki-zinnia-simplified-chinese
"18wq0jccv7lpnrfnzspyc110d6pj2v1i21xcx4fmgzz1lnln3fs5"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-simplified-chinese-light
(package
@ -1184,7 +1178,7 @@ (define-public tegaki-zinnia-simplified-chinese-light
"0v24yf0w0p03lb7fyx128a75mwzad166bigvlbrzqnad789qg1sr"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-traditional-chinese
(package
@ -1200,7 +1194,7 @@ (define-public tegaki-zinnia-traditional-chinese
"140nlp6hynrai2svs5670jjfw1za6ayflhyj2dl0bzsfgbk3447l"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-zinnia-traditional-chinese-light
(package
@ -1216,7 +1210,7 @@ (define-public tegaki-zinnia-traditional-chinese-light
"1m6yk6a57vs9wg5y50qciwi1ahhmklp2mgsjysbj4mnyzv6yhcr2"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-wagomu-japanese
(package
@ -1232,7 +1226,7 @@ (define-public tegaki-wagomu-japanese
"0flj5id8xwsn7csrrzqz9prdikswnwm2wms0as2vzdpxzph1az4k"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-wagomu-japanese-kyoiku
(package
@ -1248,7 +1242,7 @@ (define-public tegaki-wagomu-japanese-kyoiku
"0v8crfh8rdf6ndp16g52s5jlrrlwh73xp38zjn5i9dlacx8kfqg1"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-wagomu-japanese-joyo
(package
@ -1264,7 +1258,7 @@ (define-public tegaki-wagomu-japanese-joyo
"0wk8shpr963zp328g991qs6abpnacq4242003m687z2d6yp7nph2"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public tegaki-wagomu-simplified-chinese
(package
@ -1280,7 +1274,7 @@ (define-public tegaki-wagomu-simplified-chinese
"0wqprynigqxqxv128i1smh81gxvmjj056d9qpznxa3n9f5ymlbj6"))
(modules remove-pre-compiled-files-modules)
(snippet (remove-pre-compiled-files "model"))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
;;; Upstream does not provide the source for tegaki-wagomu-traditional-chinese.
;;; Therefore, we use the source for tegaki-zinnia-traditional-chinese and
@ -1301,7 +1295,7 @@ (define-public tegaki-wagomu-traditional-chinese
(substitute* "Makefile"
(("zinnia") "wagomu"))
#t))))))
(license lgpl2.1))) ; all files
(license license:lgpl2.1)))
(define-public link-grammar
(package
@ -1325,7 +1319,7 @@ (define-public link-grammar
labelled links connecting pairs of words. The parser also produces a
\"constituent\" (HPSG style phrase tree) representation of a sentence (showing
noun phrases, verb phrases, etc.).")
(license bsd-3)))
(license license:bsd-3)))
(define-public praat
(package
@ -1368,4 +1362,4 @@ (define-public praat
(description "Praat is a tool to perform phonetics tasks. It can do speech
analysis (pitch, formant, intensity, ...), speech synthesis, labelling, segmenting
and manipulation.")
(license gpl2+)))
(license license:gpl2+)))