unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
From: Ahmad Draidi via Guix-patches via <guix-patches@gnu.org>
To: 63506@debbugs.gnu.org
Cc: "Ahmad Draidi" <a.r.draidi@redscript.org>,
	"Zhu Zihao" <all_but_last@163.com>, 宋文武 <iyzsong@envs.net>
Subject: [bug#63506] [PATCH] gnu: Add font-scientifica.
Date: Mon, 15 May 2023 00:21:17 +0400	[thread overview]
Message-ID: <0d0d6f46c5515a0fbb7b3f9b63600f2872a3c90d.1684095647.git.a.r.draidi@redscript.org> (raw)

* gnu/packages/fonts.scm (font-scientifica): New variable.
---
 gnu/packages/fonts.scm | 52 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index e4c53dbc73..c5bbce2592 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -3152,3 +3152,55 @@ (define-public font-spleen
 
 Spleen also has support for Powerline symbols out of the box.")
     (license license:bsd-2)))
+
+(define-public font-scientifica
+  (package
+    (name "font-scientifica")
+    (version "2.3")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://github.com/nerdypepper/scientifica/releases/download/"
+                    "v" version "/scientifica.tar"))
+              (sha256
+               (base32
+                "0zwa3s75lvbky2vn73i1fmxa37hi3zfm7f6wfpqwcip8l1lpi1gh"))))
+    (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
+     "@code{scientifica} is largely based on
+@url{https://github.com/romeovs/creep, @code{creep}}, with a number of
+minor tweaks to improve readability (a matter of taste of course).
+Most characters are just 4px wide, which is brilliant for low dpi(90-120) displays.")
+    (license license:silofl1.1)))

base-commit: 7b00b155d8f474d493a22ff7cccbeec311b9bbc8
-- 
2.40.1





             reply	other threads:[~2023-05-14 20:23 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-05-14 20:21 Ahmad Draidi via Guix-patches via [this message]
2023-05-15  9:52 ` [bug#63506] [PATCH] gnu: Add font-scientifica 宋文武 via Guix-patches via
2023-05-15  9:57   ` bug#63506: " 宋文武 via Guix-patches via

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=0d0d6f46c5515a0fbb7b3f9b63600f2872a3c90d.1684095647.git.a.r.draidi@redscript.org \
    --to=guix-patches@gnu.org \
    --cc=63506@debbugs.gnu.org \
    --cc=a.r.draidi@redscript.org \
    --cc=all_but_last@163.com \
    --cc=iyzsong@envs.net \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).