diff mbox series

[bug#64677] Add Arphic Public License to Guix

Message ID 3JNoflGCjZp4hwhpxP92L33qY-FjBFKpafML6dcIbZxaJA-MW17Q1DW0jh_0Rio0JToMqvUrhTQnW9I4uY7m7A8prLEcXbKBE2yIJu1uh5s=@proton.me
State New
Headers show
Series [bug#64677] Add Arphic Public License to Guix | expand

Commit Message

vasilii.smirnov--- via Guix-patches" via July 16, 2023, 6:43 p.m. UTC 
Hi guys, this is my first time trying to send a patch, if I did something wrong, please point out my wrongdoings if necessary.

Comments

Christian Miller July 18, 2023, 1:24 a.m. UTC | #1 
Hi,

you have a typo.  You wrote "licnese" instead of "license".
diff mbox series

Patch

From 259ceb68943480667904aa6fe7c905d58cb9aa1f Mon Sep 17 00:00:00 2001
From: walky_talky <pat-hwaki@proton.me>
Date: Sun, 16 Jul 2023 23:44:28 +0800
Subject: [PATCH] add Aprhic Public license

---
 guix/import/utils.scm | 1 +
 guix/licenses.scm     | 8 ++++++++
 2 files changed, 9 insertions(+)

diff --git a/guix/import/utils.scm b/guix/import/utils.scm
index e9a0a7ecd7..a54eaa4adb 100644
--- a/guix/import/utils.scm
+++ b/guix/import/utils.scm
@@ -179,6 +179,7 @@  (define %spdx-license-identifiers
     ("AGPL-3.0"                   . license:agpl3)
     ("AGPL-3.0-only"              . license:agpl3)
     ("AGPL-3.0-or-later"          . license:agpl3+)
+    ("Arphic-1999"                . license:arphic-1999)
     ("Apache-1.1"                 . license:asl1.1)
     ("Apache-2.0"                 . license:asl2.0)
     ("APSL-2.0"                   . license:apsl2)
diff --git a/guix/licenses.scm b/guix/licenses.scm
index e7e6ef3545..39076b03cb 100644
--- a/guix/licenses.scm
+++ b/guix/licenses.scm
@@ -41,6 +41,7 @@  (define-module (guix licenses)
   #:export (license? license-name license-uri license-comment
             agpl1 agpl3 agpl3+
             apsl2
+            arphic-1999
             asl1.1 asl2.0
             boost1.0
             bsd-0 bsd-1 bsd-2 bsd-3 bsd-4
@@ -191,6 +192,13 @@  (define apsl2
            "https://directory.fsf.org/wiki/License:APSL-2.0"
            "https://www.gnu.org/licenses/license-list.html#apsl2"))
 
+(define arphic-1999
+  (licnese "Arphic Public License"
+           ;;This is a copyleft free software license, incompatible with the GPL.
+           ;;Its normal use is for fonts, and in that use, the incompatibility does not cause a problem.
+           "https://directory.fsf.org/wiki/License:Arphic-PL"
+           "https://www.gnu.org/licenses/license-list.html#Arphic"))
+
 (define asl1.1
   (license "ASL 1.1"
            "http://directory.fsf.org/wiki/License:Apache1.1"
-- 
2.41.0