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>
This commit is contained in:
8p8c 2016-10-06 00:15:53 +03:00 committed by 宋文武
parent 3126fd8820
commit b94ee996ce
No known key found for this signature in database
GPG key ID: 26525665AE727D37

View file

@ -837,22 +837,15 @@ (define-public font-hack
"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)))