~ruther/guix-local

b94ee996cea9fda51751ee7ebab6cf0f01aadfdd — 8p8c 9 years ago 3126fd8
gnu: font-hack: Remove empty doc directory.

* gnu/packages/fonts.scm (font-hack)[arguments]: Remove superfluous code
in #:builder.

Signed-off-by: 宋文武 <iyzsong@gmail.com>
1 files changed, 2 insertions(+), 9 deletions(-)

M gnu/packages/fonts.scm
M gnu/packages/fonts.scm => gnu/packages/fonts.scm +2 -9
@@ 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)))