From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alex Kost Subject: [PATCH] gnu: Add 'font-liberation'. Date: Sun, 23 Nov 2014 23:13:37 +0300 Message-ID: <87fvd9vfny.fsf_-_@gmail.com> References: <87ioj1sccx.fsf_-_@gnu.org> <87ppd9e6ah.fsf@gmail.com> <20141030191743.GB19999@debian.eduroam.u-bordeaux.fr> <878ujxdxmj.fsf@gmail.com> <20141031175840.GA16902@debian> <87sii4q64v.fsf@gnu.org> <20141101095205.GB30939@debian> <87ioixo71g.fsf@gnu.org> <20141102174935.GF6865@debian> <87d294u0la.fsf@gnu.org> <20141103093001.GB7644@debian.eduroam.u-bordeaux.fr> <87r3wz1s4k.fsf@gnu.org> <874mtul55w.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:45360) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XsdXT-0000Pc-4P for guix-devel@gnu.org; Sun, 23 Nov 2014 15:13:47 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XsdXO-0003gE-Sw for guix-devel@gnu.org; Sun, 23 Nov 2014 15:13:42 -0500 In-Reply-To: <874mtul55w.fsf@gmail.com> (Alex Kost's message of "Thu, 20 Nov 2014 10:09:15 +0300") List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: Ludovic =?utf-8?Q?Court=C3=A8s?= Cc: guix-devel@gnu.org --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Alex Kost (2014-11-20 10:09 +0300) wrote: > Ludovic Court=C3=A8s (2014-11-19 12:01 +0300) wrote: > >> I think there were a couple of packages submitted, notably the >> Liberation font. >> >> What about resubmitting them following the agreed-upon naming >> convention, Alex? > > Sure, I'm just waiting for the existing packages to be updated, because > I don't fully understand how the liberation package should be named now. > =E2=80=9Cfont-liberation=E2=80=9D? Andreas "confirmed" this name in his font convention patch, so I am resending the updated patch. --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: attachment; filename=0001-gnu-Add-font-liberation.patch Content-Transfer-Encoding: quoted-printable >From 93cf792c9ced8763251780cfa159fd999500c307 Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Tue, 28 Oct 2014 09:44:16 +0300 Subject: [PATCH] gnu: Add 'font-liberation'. * gnu/packages/fonts.scm (font-liberation): New variable. --- gnu/packages/fonts.scm | 66 ++++++++++++++++++++++++++++++++++++++++++++++= ++++ 1 file changed, 66 insertions(+) diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm index 4ed86d9..0181420 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -2,6 +2,7 @@ ;;; Copyright =C2=A9 2013 Ludovic Court=C3=A8s ;;; Copyright =C2=A9 2014 Mark H Weaver ;;; Copyright =C2=A9 2014 Joshua Grant +;;; Copyright =C2=A9 2014 Alex Kost ;;; ;;; This file is part of GNU Guix. ;;; @@ -203,6 +204,71 @@ package provides the TrueType (TTF) files.") 10646/Unicode UCS (Universal Character Set).") (license license:gpl3+))) =20 +(define-public font-liberation + (package + (name "font-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") --=20 2.1.3 --=-=-=--