diff options
author | Nils Gillmann <niasterisk@grrlz.net> | 2016-03-06 18:23:11 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-03-13 23:39:26 +0100 |
commit | aae6b4b9a98a5b183aa5bd3a5850ecca609fdc92 (patch) | |
tree | 7ccd4437b24469b7ab272a0b33e2e6d58d7a52a4 /gnu/packages | |
parent | 467c498bdc246ba130f657b2d8af052fe9d332b0 (diff) | |
download | guix-aae6b4b9a98a5b183aa5bd3a5850ecca609fdc92.tar.gz |
gnu: Add font-un.
* gnu/packages/fonts.scm (font-un): New variable. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu/packages')
-rw-r--r-- | gnu/packages/fonts.scm | 67 |
1 files changed, 67 insertions, 0 deletions
diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm index 24fd9c2722..01c5eef7ff 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -673,3 +673,70 @@ utilities to ease adding new glyphs to the font.") languages with a consistent look and aesthetic. It's goal is to have no Unicode symbols unable to be displayed properly.") (license license:silofl1.1))) + +(define-public font-un + (package + (name "font-un") + (version "1.0.2-080608") + ;; The upstream server at kldp.net is serving us broken MIME. + ;; See <http://bugs.gnu.org/22908>. + (source (origin + (method url-fetch) + (uri (list + (string-append + "http://krosos.sdf.org/static/unix/" + "un-fonts-core-" version ".tar.gz") + ;; XXX: The upstream server at kldp.net + (string-append + "https://kldp.net/projects/unfonts/download/4695?filename=" + "un-fonts-core-" version ".tar.gz"))) + (file-name (string-append name "-" version ".tar.gz")) + (sha256 + (base32 + "13liaz2pmww3aqabm55la5npd08m1skh334ky7qfidxaz5s742iv")))) + (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 "un-fonts")) + (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)))) + '("COPYING" "README")))))) + (native-inputs + `(("tar" ,tar) + ("gzip" ,gzip))) + (home-page "https://kldp.net/projects/unfonts/") + (synopsis "Collection of Korean fonts") + (description + "Un-fonts is a family of mainly Korean fonts. +It contains the following fonts and styles: + +@enumerate +@item UnBatang, UnBatangBold: serif; +@item UnDotum, UnDotumBold: sans-serif; +@item UnGraphic, UnGraphicBold: sans-serif style; +@item UnDinaru, UnDinaruBold, UnDinaruLight; +@item UnPilgi, UnPilgiBold: script; +@item UnGungseo: cursive, brush-stroke. +@end enumerate\n") + (license license:gpl2+))) |