guix-patches
[Top][All Lists]
Advanced

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

[bug#70496] [PATCH 13/14] gnu: font-scientifica: Remove unnecessary cust


From: iyzsong
Subject: [bug#70496] [PATCH 13/14] gnu: font-scientifica: Remove unnecessary custom install phase.
Date: Sun, 21 Apr 2024 18:28:47 +0800

From: 宋文武 <iyzsong@member.fsf.org>

* gnu/packages/fonts.scm (font-scientifica)[arguments]: Remove field.

Change-Id: Ice422a8604adba6b4a5b31675303f4030c6e35af
---
 gnu/packages/fonts.scm | 28 ----------------------------
 1 file changed, 28 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 98ae06818d..447fcd40f9 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -3595,34 +3595,6 @@ (define-public font-scientifica
     (build-system font-build-system)
     (outputs '("out" ;OTB
                "bdf" "ttf"))
-    (arguments
-     (list #:phases #~(modify-phases %standard-phases
-                        (replace 'install
-                          (lambda* (#:key outputs #:allow-other-keys)
-                            (let* ((otb (assoc-ref outputs "out"))
-                                   (bdf (assoc-ref outputs "bdf"))
-                                   (ttf (assoc-ref outputs "ttf"))
-                                   (otb-font-dir (string-append (assoc-ref
-                                                                 outputs "out")
-                                                  "/share/fonts/misc"))
-                                   (ttf-font-dir (string-append (assoc-ref
-                                                                 outputs "ttf")
-                                                  "/share/fonts/truetype"))
-                                   (bdf-font-dir (string-append (assoc-ref
-                                                                 outputs "bdf")
-                                                  "/share/fonts/misc")))
-                              (mkdir-p otb-font-dir)
-                              (mkdir-p bdf-font-dir)
-                              (mkdir-p ttf-font-dir)
-                              (for-each (lambda (otb)
-                                          (install-file otb otb-font-dir))
-                                        (find-files "." "\\.otb$"))
-                              (for-each (lambda (bdf)
-                                          (install-file bdf bdf-font-dir))
-                                        (find-files "." "\\.bdf$"))
-                              (for-each (lambda (ttf)
-                                          (install-file ttf ttf-font-dir))
-                                        (find-files "." "\\.ttf$"))) #t)))))
     (home-page "https://github.com/nerdypepper/scientifica";)
     (synopsis "Tall and condensed bitmap font for geeks")
     (description
-- 
2.41.0






reply via email to

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