From: Dmitry Nikolaev <cameltheman@gmail.com>
To: guix-devel <guix-devel@gnu.org>
Subject: Hack font family for GuixSD.
Date: Thu, 2 Jun 2016 08:13:23 +0300 [thread overview]
Message-ID: <CAH3JXcHG1PMKXAr+ikmkE=9TdMgJMn1xW1XN2HfdwmmFCX62TQ@mail.gmail.com> (raw)
[-- Attachment #1: Type: text/plain, Size: 3884 bytes --]
Hi. I wrote expression for adding Hack font family to GuixSD. You can see
it my guix package repository:
https://github.com/8p8c/my-guix/blob/master/packages/font-hack.scm
Here is patch for fonts.scm:
--- fonts.scm 2016-06-02 08:01:49.387086500 +0300
+++ fonts.new.scm 2016-06-02 08:05:30.005373478 +0300
@@ -9,6 +9,7 @@
;;; Copyright © 2016 Nils Gillmann <niasterisk@grrlz.net>
;;; Copyright © 2016 Jookia <166291@gmail.com>
;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org>
+;;; Copyright © 2016 Dmitry Nikolaev <cameltheman@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -921,3 +922,54 @@
(home-page "https://fontlibrary.org/en/font/fantasque-sans-mono")
(license license:silofl1.1)))
+(define-public font-hack
+ (package
+ (name "font-hack")
+ (version "2.020")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "
https://github.com/chrissimpkins/Hack/releases/download/v"
+ version
+ "/Hack-v"
+ "2_020" ;; FIXME
+ "-ttf.zip"))
+ (sha256
+ (base32
+ "16kkmc3psckw1b7k07ccn1gi5ymhlg9djh43nqjzg065g6p6d184"))))
+ (build-system trivial-build-system)
+ (arguments
+ `(#:modules ((guix build utils))
+ #:builder (begin
+ (use-modules (guix build utils)
+ (srfi srfi-26))
+
+ (let ((PATH (string-append (assoc-ref
%build-inputs
+
"unzip")
+ "/bin"))
+ (font-dir (string-append %output
+
"/share/fonts/truetype"))
+ (doc-dir (string-append %output
"/share/doc/"
+ ,name "-"
,version)))
+ (setenv "PATH" PATH)
+ (system* "unzip" (assoc-ref %build-inputs
"source"))
+
+ (mkdir-p font-dir)
+ (mkdir-p doc-dir)
+ (for-each (lambda (ttf)
+ (copy-file ttf
+ (string-append
font-dir "/" ttf)))
+ (find-files "." "\\.ttf$"))
+ (for-each (lambda (doc)
+ (copy-file doc
+ (string-append
doc-dir "/" doc)))
+ (find-files "." "\\.txt$"))))))
+ (native-inputs `(("source" ,source)
+ ("unzip" ,unzip)))
+ (home-page "https://sourcefoundry.org/hack/")
+ (synopsis "A typeface designed for sourcecode.")
+ (description "The Hack Font is designed for the screen.")
+ (license
+ (license:non-copyleft ;;FIXME
+ "https://github.com/chrissimpkins/Hack/blob/master/LICENSE.md"
+ "Hack Open Font License v2.0"))))
But there are two FIXME issues. First with URI string generation. Sorry, I
haven't mastered Scheme yet:
(uri (string-append
"
https://github.com/chrissimpkins/Hack/releases/download/v"
version
"/Hack-v"
"2_020" ;; FIXME. This should be generated from version
"2.020"
"-ttf.zip"))
And second with licence. I've marked it as non-copyleft, but I'm not sure
about it:
(license
(license:non-copyleft ;;FIXME
"https://github.com/chrissimpkins/Hack/blob/master/LICENSE.md"
"Hack Open Font License v2.0"))
Dmitry
[-- Attachment #2: Type: text/html, Size: 6553 bytes --]
next reply other threads:[~2016-06-02 5:13 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-06-02 5:13 Dmitry Nikolaev [this message]
2016-06-02 11:55 ` Hack font family for GuixSD 宋文武
-- strict thread matches above, loose matches on Subject: below --
2016-06-06 20:34 Dmitry Nikolaev
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='CAH3JXcHG1PMKXAr+ikmkE=9TdMgJMn1xW1XN2HfdwmmFCX62TQ@mail.gmail.com' \
--to=cameltheman@gmail.com \
--cc=guix-devel@gnu.org \
/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).