diff options
author | 8p8c <cameltheman@gmail.com> | 2016-06-06 23:27:10 +0300 |
---|---|---|
committer | 宋文武 <iyzsong@gmail.com> | 2016-06-07 22:32:10 +0800 |
commit | 73c8d39c4bd5f57feeeb7fae8e3e00e3001b7400 (patch) | |
tree | 9120e9beb9e8118d9ca6ddba1af78e3aea1a54d0 /gnu/packages/fonts.scm | |
parent | 2d15f60126a53a841cd81fdc90a162fbb3559a9a (diff) | |
download | patches-73c8d39c4bd5f57feeeb7fae8e3e00e3001b7400.tar patches-73c8d39c4bd5f57feeeb7fae8e3e00e3001b7400.tar.gz |
gnu: Add font-hack.
* gnu/packages/fonts.scm (font-hack): New variable.
Signed-off-by: 宋文武 <iyzsong@gmail.com>
Diffstat (limited to 'gnu/packages/fonts.scm')
-rw-r--r-- | gnu/packages/fonts.scm | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm index 893db56ee5..fd3962dbc3 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -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. ;;; @@ -808,3 +809,57 @@ mind. The font includes a bold version and a good italic version with new glyph designs, not just an added slant.") (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" + (string-replace-substring version "." "_") + "-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 "Typeface designed for sourcecode") + (description + "Hack is designed to be a workhorse typeface for code, it expands upon +the Bitstream Vera & DejaVu projects, provides 1561 glyphs including +powerline support.") + (license (license:x11-style + "https://github.com/chrissimpkins/Hack/blob/master/LICENSE.md" + "Hack Open Font License v2.0")))) |