Not related to this patch: what about renaming ‘freefont-ttf’ package
into ‘ttf-freefont’ to make all TrueType fonts have a name "ttf-…"?
>From 5cddcfb5939bd783527194381e4a8e107fc39395 Mon Sep 17 00:00:00 2001
From: Alex Kost <alez...@gmail.com>
Date: Tue, 28 Oct 2014 09:44:16 +0300
Subject: [PATCH 2/2] gnu: Add 'ttf-liberation'.
* gnu/packages/fonts.scm (ttf-liberation): New variable.
---
gnu/packages/fonts.scm | 65 ++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 65 insertions(+)
diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 825395b..94bf79d 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -203,6 +203,71 @@ package provides the TrueType (TTF) files.")
10646/Unicode UCS (Universal Character Set).")
(license license:gpl3+)))
+(define-public ttf-liberation
+ (package
+ (name "ttf-liberation")
+ (version "2.00.1")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "https://fedorahosted.org/releases/l/i/";
+ "liberation-fonts/liberation-fonts-ttf-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "010m4zfqan4w04b6bs9pm3gapn9hsb18bmwwgp2p6y6idj52g43q"))))
+ (build-system trivial-build-system)
+ (arguments
+ `(#:modules ((guix build utils))
+ #:builder
+ (begin
+ (use-modules (guix build utils))
+
+ (let ((tar (string-append (assoc-ref %build-inputs "tar")
+ "/bin/tar"))
+ (PATH (string-append (assoc-ref %build-inputs "gzip")
+ "/bin"))
+ (font-dir (string-append %output "/share/fonts/truetype"))
+ (doc-dir (string-append %output "/share/doc/" ,name)))
+ (setenv "PATH" PATH)
+ (system* tar "xvf" (assoc-ref %build-inputs "source"))
+ (mkdir-p font-dir)
+ (mkdir-p doc-dir)
+ (chdir (string-append "liberation-fonts-ttf-" ,version))
+ (for-each (lambda (ttf)
+ (copy-file ttf
+ (string-append font-dir "/"
+ (basename ttf))))
+ (find-files "." "\\.ttf$"))
+ (for-each (lambda (doc)
+ (copy-file doc
+ (string-append doc-dir "/"
+ (basename doc))))
+ '("AUTHORS" "ChangeLog" "LICENSE" "README" "TODO"))))))
+ (native-inputs
+ `(("source" ,source)
+ ("tar" ,tar)
+ ("gzip" ,gzip)))
+ (home-page "https://fedorahosted.org/liberation-fonts/";)
+ (synopsis
+ "Fonts compatible with Arial, Times New Roman, and Courier New")
+ (description
+ "The Liberation font family aims at metric compatibility with
+Arial, Times New Roman, and Courier New.
+
+There are three sets:
+
+- Sans (a substitute for Arial, Albany, Helvetica, Nimbus Sans L, and
+Bitstream Vera Sans);
+
+- Serif (a substitute for Times New Roman, Thorndale, Nimbus Roman, and
+Bitstream Vera Serif);
+
+- Mono (a substitute for Courier New, Cumberland, Courier, Nimbus Mono L,
+and Bitstream Vera Sans Mono).
+
+The Liberation Fonts are sponsored by Red Hat.")
+ (license license:silofl1.1)))
+
(define-public terminus-font
(package
(name "terminus-font")
--
2.1.2
