guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

04/05: gnu: font-terminus: Install X11 8-bit code pages.


From: guix-commits
Subject: 04/05: gnu: font-terminus: Install X11 8-bit code pages.
Date: Thu, 14 Mar 2019 17:14:22 -0400 (EDT)

nckx pushed a commit to branch master
in repository guix.

commit a431e213835cc47fcddc55d1e2f4b7201404fde5
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Thu Mar 14 21:59:44 2019 +0100

    gnu: font-terminus: Install X11 8-bit code pages.
    
    * gnu/packages/fonts.scm (font-terminus)[outputs]: Add ‘pcf-8bit’ output.
    [arguments]: Add new phases to build and install these 8-bit PCF fonts.
---
 gnu/packages/fonts.scm | 18 ++++++++++++++++--
 1 file changed, 16 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index bb8548c..e686799 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -353,14 +353,28 @@ Biolinum is available in both Regular and Bold weights.")
        (sha256
         (base32 "15qjcpalcxjiwsjgjg5k88vkwp56cs2nnx4ghya6mqp4i1c206qg"))))
     (build-system gnu-build-system)
+    (outputs (list "out" "pcf-8bit"))
+    (arguments
+     `(#:tests? #f                      ; no test target in tarball
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'build 'build-more-bits
+           ;; X11 8-bit code pages aren't installed by default (they were
+           ;; until version 4.46).  Build and install them separately.
+           (lambda* (#:key make-flags #:allow-other-keys)
+             (apply invoke "make" "pcf-8bit" make-flags)))
+         (add-after 'install 'install-more-bits
+           (lambda* (#:key make-flags outputs #:allow-other-keys)
+             (let ((pcf-8bit (assoc-ref outputs "pcf-8bit")))
+               (apply invoke "make" "install-pcf-8bit" (string-append "prefix="
+                                                                      pcf-8bit)
+                      make-flags)))))))
     (native-inputs
      `(("bdftopcf" ,bdftopcf)
        ("font-util" ,font-util)
        ("mkfontdir" ,mkfontdir)
        ("pkg-config" ,pkg-config)
        ("python" ,python)))
-    (arguments
-     `(#:tests? #f))                    ; no test target in tarball
     (home-page "http://terminus-font.sourceforge.net/";)
     (synopsis "Simple bitmap programming font")
     (description "Terminus Font is a clean, fixed-width bitmap font, designed



reply via email to

[Prev in Thread] Current Thread [Next in Thread]