From patchwork Mon Feb 3 11:45:44 2020 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Roel Janssen X-Patchwork-Id: 20072 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id A6AB1168B9; Mon, 3 Feb 2020 11:46:16 +0000 (GMT) X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.9 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI, URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.2 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTP id 189E7168B6 for ; Mon, 3 Feb 2020 11:46:16 +0000 (GMT) Received: from localhost ([::1]:38588 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iyaBD-00041J-IB for patchwork@mira.cbaines.net; Mon, 03 Feb 2020 06:46:15 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:38993) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iyaB1-00040z-UE for guix-patches@gnu.org; Mon, 03 Feb 2020 06:46:05 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iyaB0-0002Ba-Eg for guix-patches@gnu.org; Mon, 03 Feb 2020 06:46:03 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:34953) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1iyaB0-0002BP-4I for guix-patches@gnu.org; Mon, 03 Feb 2020 06:46:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1iyaB0-0000b4-1P for guix-patches@gnu.org; Mon, 03 Feb 2020 06:46:02 -0500 X-Loop: help-debbugs@gnu.org Subject: [bug#39405] [PATCH] gnu: Add fntsample. Resent-From: Roel Janssen Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 03 Feb 2020 11:46:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 39405 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 39405@debbugs.gnu.org X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.15807303552277 (code B ref -1); Mon, 03 Feb 2020 11:46:01 +0000 Received: (at submit) by debbugs.gnu.org; 3 Feb 2020 11:45:55 +0000 Received: from localhost ([127.0.0.1]:40926 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1iyaAo-0000ab-DN for submit@debbugs.gnu.org; Mon, 03 Feb 2020 06:45:54 -0500 Received: from lists.gnu.org ([209.51.188.17]:49306) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1iyaAm-0000aT-W2 for submit@debbugs.gnu.org; Mon, 03 Feb 2020 06:45:49 -0500 Received: from eggs.gnu.org ([2001:470:142:3::10]:38893) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iyaAl-00040d-DP for guix-patches@gnu.org; Mon, 03 Feb 2020 06:45:48 -0500 Received: from fencepost.gnu.org ([2001:470:142:3::e]:36795) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1iyaAl-0001mC-7F for guix-patches@gnu.org; Mon, 03 Feb 2020 06:45:47 -0500 Received: from [143.121.198.62] (port=32938 helo=cog147) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1iyaAk-0008HE-Jm for guix-patches@gnu.org; Mon, 03 Feb 2020 06:45:46 -0500 Message-ID: <79ee459a976bfeab9b89555de1f44a498281fc27.camel@gnu.org> From: Roel Janssen Date: Mon, 03 Feb 2020 12:45:44 +0100 X-Mailer: Evolution 3.28.5-0ubuntu0.18.04.1 Mime-Version: 1.0 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 209.51.188.43 X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches Dear Guix, I'd like to add "fntsample". The following two patches do that. Kind regards, Roel Janssen From 17df554661c71e8724bf3e241021345b9b9cefef Mon Sep 17 00:00:00 2001 From: Roel Janssen Date: Mon, 3 Feb 2020 12:29:33 +0100 Subject: [PATCH 2/2] gnu: Add fntsample. * gnu/packages/fontutils.scm (fntsample): New variable. --- gnu/packages/fontutils.scm | 62 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 62 insertions(+) diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm index aba6f07537..b5a2531597 100644 --- a/gnu/packages/fontutils.scm +++ b/gnu/packages/fontutils.scm @@ -10,6 +10,7 @@ ;;; Copyright © 2018 Ricardo Wurmus ;;; Copyright © 2018, 2019 Ludovic Courtès ;;; Copyright © 2019 Marius Bakke +;;; Copyright © 2020 Roel Janssen ;;; ;;; This file is part of GNU Guix. ;;; @@ -774,3 +775,64 @@ tools or editing configuration files by hand. While designed primarily with the GNOME Desktop Environment in mind, it should work well with other GTK+ desktop environments.") (license license:gpl3+))) + +(define-public fntsample + (package + (name "fntsample") + (version "5.3") + (source (origin + (method url-fetch) + (uri (string-append + "https://github.com/eugmes/fntsample/archive/release/" + version ".tar.gz")) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "0awp4dh1g40ivzvm5xqlvcpcdw1vplrx3drjmbylr62y185vbs74")))) + (build-system cmake-build-system) + (arguments + `(#:tests? #f ; There are no tests. + #:configure-flags + (list (string-append + "-DUNICODE_BLOCKS=" (assoc-ref %build-inputs "unicode-blocks"))) + #:phases + (modify-phases %standard-phases + (add-after 'install 'set-library-path + (lambda* (#:key inputs outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (pdf-api2 (assoc-ref inputs "perl-pdf-api2")) + (intl (assoc-ref inputs "perl-libintl-perl")) + (perllib (string-append pdf-api2 + "/lib/perl5/site_perl/" + ,(package-version perl) + ":" intl + "/lib/perl5/site_perl/" + ,(package-version perl)))) + (wrap-program (string-append out "/bin/pdfoutline") + `("PERL5LIB" ":" prefix (,perllib))) + #t)))))) + (native-inputs + `(("pkg-config" ,pkg-config) + ("gettext" ,gettext-minimal))) + (inputs + `(("cairo" ,cairo) + ("fontconfig" ,fontconfig) + ("freetype" ,freetype) + ("glib" ,glib) + ("pango" ,pango) + ("perl-pdf-api2" ,perl-pdf-api2) + ("perl-libintl-perl" ,perl-libintl-perl) + ("unicode-blocks" + ,(origin + (method url-fetch) + (uri "http://unicode.org/Public/UNIDATA/Blocks.txt") + (file-name "unicode-blocks.txt") + (sha256 + (base32 + "1xs8fnhh48gs41wg004r7m4r2azh9khmyjjlnvyzy9c6zrd212x2")))))) + (home-page "https://github.com/eugmes/fntsample") + (synopsis "PDF and PostScript font samples generator") + (description "This package provides a tool that can be used to make font +samples that show coverage of the font and are similar in appearance to +Unicode Charts. It was developed for use with DejaVu Fonts project.") + (license license:gpl3+))) -- 2.17.1