GNU bug report logs - #54076
[PATCH] gnu: added font-termsyn

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 54076 in the body.
You can then email your comments to 54076 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: kitzman <kitzman <at> disroot.org>
To: guix-patches <at> gnu.org
Subject: [PATCH] gnu: added font-termsyn
Date: Sun, 20 Feb 2022 21:43:08 +0200

[Message part 1 (text/plain, inline)]

I have attached inline a patch adding, to gnu/packages/fonts.scm, the
font-termsyn package.

[0001-gnu-added-font-termsyn.patch (text/x-diff, inline)]

From ca77fce8c54f25c0a634347d74bdcf5e0557d45b Mon Sep 17 00:00:00 2001
From: kitzman <kitzman <at> disroot.org>
Date: Sun, 20 Feb 2022 21:39:35 +0200
Subject: [PATCH] gnu: added font-termsyn

---
 gnu/packages/fonts.scm | 75 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 74 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 536892ee0d..195f5cd4b9 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -44,6 +44,7 @@
 ;;; Copyright © 2021 Paul A. Patience <paul <at> apatience.com>
 ;;; Copyright © 2021 Taiju HIGASHI <higashi <at> taiju.info>
 ;;; Copyright © 2022 Philip McGrath <philip <at> philipmcgrath.com>
+;;; Copyright © 2022 Kitzman <kitzman <at> disroot.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -2463,4 +2464,76 @@ (define-public font-charter
          "Bitstream contributed the Charter family "
          "to the X Consortium in 1992.  "
          "The license is also embedded in the font metadata."))))))
-/
+
+(define-public font-termsyn
+  (package
+    (name "font-termsyn")
+    (version "1.8.7")
+    (source
+     (origin
+       (method url-fetch)
+       (uri
+        (string-append
+         "mirror://sourceforge/termsyn/termsyn-"
+         version ".tar.gz"))
+       (sha256
+        (base32 "15vsmc3nmzl0pkgdpr2993da7p38fiw2rvcg01pwldzmpqrmkpn6"))))
+    (build-system font-build-system)
+    (outputs '("out"
+               "psf"
+               "otf"))
+    (native-inputs `(("fontforge" ,fontforge)))
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-before 'install 'build
+           (lambda _
+             (use-modules (ice-9 regex)
+                          (ice-9 match))
+             (define (pcf2 name ext)
+               (invoke
+                "fontforge" "-lang=ff"
+                "-c"
+                (string-append
+                 "Open('" name "');"
+                 "Generate('"
+                 (basename name "pcf") ext
+                 "','ttf')")))
+             (for-each (lambda (pcf)
+                         (pcf2 pcf "otf"))
+                       (find-files "." "\\.pcf$"))
+             #t))
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((pcf (assoc-ref outputs "out"))
+                    (psf (assoc-ref outputs "psf"))
+                    (otf (assoc-ref outputs "otf"))
+                    (pcf-font-dir (string-append pcf "/share/fonts/termsyn"))
+                    (otf-font-dir (string-append otf "/share/fonts/termsyn-otf"))
+                    (psf-font-dir (string-append psf "/share/kbd/consolefonts")))
+               (mkdir-p pcf-font-dir)
+               (mkdir-p otf-font-dir)
+               (mkdir-p psf-font-dir)
+               (for-each (lambda (pcf)
+                           (install-file pcf pcf-font-dir))
+                         (find-files "." "\\.pcf$"))
+               (for-each (lambda (psfu)
+                           (install-file psfu psf-font-dir))
+                         (find-files "." "\\.psfu$"))
+               (for-each (lambda (otf)
+                           (install-file otf otf-font-dir))
+                         (find-files "." "\\.otf$")))
+             #t)))))
+    (home-page "https://sourceforge.net/projects/termsyn/")
+    (synopsis "Monospaced font based on terminus and tamsyn")
+    (description
+     "Monospaced font based on terminus and tamsyn.
+
+This package contains the following outputs:
+@enumerate
+@item out: pcf font
+@item otf: otf font
+@item psf: psfu font
+@end enumerate\n
+")
+    (license license:gpl2)))
-- 
2.32.0

Message #10 received at 54076-done <at> debbugs.gnu.org (full text, mbox):

From: 宋文武 <iyzsong <at> outlook.com>
To: kitzman <kitzman <at> disroot.org>
Cc: 54076-done <at> debbugs.gnu.org
Subject: Re: bug#54076: [PATCH] gnu: added font-termsyn
Date: Mon, 21 Feb 2022 22:30:06 +0800

kitzman <kitzman <at> disroot.org> writes:

> I have attached inline a patch adding, to gnu/packages/fonts.scm, the
> font-termsyn package.

With some small changes:
1. Change the description to use a full sentence.
2. use (list fontforge) as native-inputs.

Pushed, thank you!

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.