Patchwork Remove empty doc directory from Hack font installation.

login
register
mail settings
Submitter Dmitry Nikolaev
Date Oct. 5, 2016, 9:19 p.m.
Message ID <CAH3JXcG7WincZMtqbj70gy-uT6-DL36_CNoTGXtt3eD23ULTtQ@mail.gmail.com>
Download mbox | patch
Permalink /patch/16288/
State New
Headers show

Comments

Dmitry Nikolaev - Oct. 5, 2016, 9:19 p.m.
Hi. Hack font original zip file does not contain any documentation about
it, so empty doc directory in its installation is useless. This patch
removes it.

Dmitry Nikolaev
=?utf-8?B?5a6L5paH5q2m?= - Oct. 6, 2016, 1:01 p.m.
Dmitry Nikolaev <cameltheman@gmail.com> writes:

> Hi. Hack font original zip file does not contain any documentation about it, so empty doc directory in its
> installation is useless. This patch removes it.

Applied, thanks!

Patch

From b85bb829aa5e8f8701e88c65c01b87976a7c5e1c Mon Sep 17 00:00:00 2001
From: 8p8c <cameltheman@gmail.com>
Date: Thu, 6 Oct 2016 00:15:53 +0300
Subject: [PATCH] Remove empty doc directory from Hack font installation.

---
 gnu/packages/fonts.scm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 9482d7a..95bc644 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -837,22 +837,15 @@  glyph designs, not just an added slant.")
                                                              "unzip")
                                                   "/bin"))
                          (font-dir (string-append %output
-                                                  "/share/fonts/truetype"))
-                         (doc-dir  (string-append %output "/share/doc/"
-                                                  ,name "-" ,version)))
+                                                  "/share/fonts/truetype")))
                      (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$"))))))
+                               (find-files "." "\\.ttf$"))))))
     (native-inputs
      `(("source" ,source)
        ("unzip" ,unzip)))
-- 
2.10.0