summaryrefslogtreecommitdiff
path: root/gnu/packages/fonts.scm
diff options
context:
space:
mode:
authorEric Dvorsak <eric@dvorsak.fr>2015-08-17 01:04:26 +0200
committerLudovic Courtès <ludo@gnu.org>2015-08-20 16:40:10 +0200
commite93b88f78282db11b914544cb162c7e3bdf6021d (patch)
treeb76cf02008162b6388ec964cc8721e94ef23f2d0 /gnu/packages/fonts.scm
parenta6dcdcac762b0396b529a3794186f31da8779338 (diff)
downloadpatches-e93b88f78282db11b914544cb162c7e3bdf6021d.tar
patches-e93b88f78282db11b914544cb162c7e3bdf6021d.tar.gz
gnu: Add font-ubuntu.
* gnu/packages/fonts/scm (font-ubuntu): New variable. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu/packages/fonts.scm')
-rw-r--r--gnu/packages/fonts.scm53
1 files changed, 53 insertions, 0 deletions
diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index f72c542fda..694f7263eb 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -4,6 +4,7 @@
;;; Copyright © 2014 Joshua Grant <tadni@riseup.net>
;;; Copyright © 2014 Alex Kost <alezost@gmail.com>
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
+;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -28,10 +29,62 @@
#:use-module (guix build-system trivial)
#:use-module (gnu packages base)
#:use-module (gnu packages compression)
+ #:use-module (gnu packages zip)
#:use-module (gnu packages perl)
#:use-module (gnu packages xorg)
#:use-module (gnu packages pkg-config))
+(define-public font-ubuntu
+ (package
+ (name "font-ubuntu")
+ (version "0.80")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "http://font.ubuntu.com/download/ubuntu-font-family-"
+ version ".zip"))
+ (sha256
+ (base32
+ "0k4f548riq23gmw4zhn30qqkcpaj4g2ab5rbc3lflfxwkc4p0w8h"))))
+ (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)
+ (chdir (string-append "ubuntu-font-family-" ,version))
+ (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 "http://font.ubuntu.com/")
+ (synopsis "The Ubuntu Font Family")
+ (description "The Ubuntu Font Family is a unique, custom designed font
+that has a very distinctive look and feel. This package provides the
+TrueType (TTF) files.")
+ (license
+ (license:non-copyleft
+ "http://font.ubuntu.com/ufl/ubuntu-font-licence-1.0.txt"
+ "Ubuntu Font License v1.0"))))
+
(define-public font-dejavu
(package
(name "font-dejavu")