Subject: bug#65473: closed (Re: [bug#65473] [PATCH] gnu: Add font-unscii.)

From: [email-masked] (GNU bug Tracking System)
Date: Mon, 28 Aug 2023 10:53:02 +0000

Your bug report

#65473: [PATCH] gnu: Add font-unscii.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
65473: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=65473
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: [bug#65473] [PATCH] gnu: Add font-unscii.
From: 宋文武 <[email-masked]>
To: [email-masked]
Date: Mon, 28 Aug 2023 18:52:53 +0800
List-Id: <debbugs-submit.debbugs.gnu.org>

Pushed now, closing.

Subject: [PATCH] gnu: Add font-unscii.
From: [email-masked]
To: [email-masked]
Cc: 宋文武 <[email-masked]>
Date: Wed, 23 Aug 2023 20:06:39 +0800
List-Id: <debbugs-submit.debbugs.gnu.org>

From: 宋文武 <[email-masked]>

* gnu/packages/fonts.scm (font-unscii): New variable.
---
 gnu/packages/fonts.scm | 57 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 56 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index e881ab11cd..8266e40259 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -3,7 +3,7 @@
 ;;; Copyright © 2014, 2017 Mark H Weaver <[email-masked]>
 ;;; Copyright © 2014 Joshua Grant <[email-masked]>
 ;;; Copyright © 2014 Alex Kost <[email-masked]>
-;;; Copyright © 2015 Sou Bunnbu <[email-masked]>
+;;; Copyright © 2015, 2023 Sou Bunnbu <[email-masked]>
 ;;; Copyright © 2015 Eric Dvorsak <[email-masked]>
 ;;; Copyright © 2015, 2017 Ricardo Wurmus <[email-masked]>
 ;;; Copyright © 2015, 2016 Leo Famulari <[email-masked]>
@@ -98,6 +98,7 @@ (define-module (gnu packages fonts)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
   #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages sdl)
   #:use-module (gnu packages xorg))
 
 (define-public font-artifika
@@ -1175,6 +1176,60 @@ (define-public font-un
 @end enumerate\n")
     (license license:gpl2+)))
 
+(define-public font-unscii
+  (package
+    (name "font-unscii")
+    (version "2.1")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "http://viznut.fi/unscii/unscii-"
+                    version "-src.tar.gz"))
+              (sha256
+               (base32
+                "0msvqrq7x36p76a2n5bzkadh95z954ayqa08wxd017g4jpa1a4jd"))))
+    (build-system gnu-build-system)
+    (outputs '("out" "otf" "ttf" "woff"))
+    (native-inputs (list bdftopcf fontforge perl perl-text-charwidth))
+    (inputs (list sdl sdl-image))
+    (arguments
+     (list #:tests? #f                  ;no tests
+           #:phases
+           #~(modify-phases %standard-phases
+               (delete 'configure)      ;no configure script
+               (replace 'install
+                 (lambda* (#:key outputs #:allow-other-keys)
+                   (let ((pcfdir (string-append
+                                  (assoc-ref outputs "out")
+                                  "/share/fonts/misc"))
+                         (otfdir (string-append
+                                  (assoc-ref outputs "otf")
+                                  "/share/fonts/opentype"))
+                         (ttfdir (string-append
+                                  (assoc-ref outputs "ttf")
+                                  "/share/fonts/truetype"))
+                         (woffdir (string-append
+                                   (assoc-ref outputs "woff")
+                                   "/share/fonts/webfonts"))
+                         (install-fonts
+                          (lambda (pred dir)
+                            (for-each
+                             (lambda (f) (install-file f dir))
+                             (find-files "." pred)))))
+                     (install-fonts "\\.pcf$" pcfdir)
+                     (install-fonts "\\.otf$" otfdir)
+                     (install-fonts "\\.ttf$" ttfdir)
+                     (install-fonts "\\.woff$" woffdir)))))))
+    (synopsis "Classic bitmapped Unicode fonts")
+    (description
+     "Unscii is a set of bitmapped Unicode fonts based on classic system
+fonts.  Unscii attempts to support character cell art well while also being
+suitable for terminal and programming use.  The two main variants are
+unscii-8 (8×8 pixels per glyph) and unscii-16 (8×16).")
+    (home-page "http://viznut.fi/unscii/")
+    ;; "unscii-16-full" falls under GPL, the other are in the Public Domain.
+    (license (list license:gpl2+ license:public-domain))))
+
 (define-public font-fantasque-sans
   (package
     (name "font-fantasque-sans")

base-commit: 3ce3466311953cc5f00a4fb34ff094a9a3501399
-- 
2.41.0