From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nils Gillmann Subject: Re: [PATCH] Add un-fonts (new patch, closes old thread) Date: Sun, 06 Mar 2016 18:23:11 +0100 Message-ID: <87k2lfcygw.fsf@grrlz.net> References: <878u1xq4g2.fsf@grrlz.net> <87wppfd0bh.fsf@grrlz.net> <87si03d004.fsf@grrlz.net> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:37345) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1accP9-0003Uw-IX for guix-devel@gnu.org; Sun, 06 Mar 2016 12:23:44 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1accP5-0004Hy-B9 for guix-devel@gnu.org; Sun, 06 Mar 2016 12:23:43 -0500 Received: from plane.gmane.org ([80.91.229.3]:46112) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1accP5-0004HQ-4c for guix-devel@gnu.org; Sun, 06 Mar 2016 12:23:39 -0500 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1accOx-0000Ea-Fx for guix-devel@gnu.org; Sun, 06 Mar 2016 18:23:31 +0100 Received: from xd9bb8d49.dyn.telefonica.de ([217.187.141.73]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 06 Mar 2016 18:23:31 +0100 Received: from niasterisk by xd9bb8d49.dyn.telefonica.de with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 06 Mar 2016 18:23:31 +0100 List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org --=-=-= Content-Type: text/plain okay, fixed it. --=-=-= Content-Type: text/x-patch Content-Disposition: inline; filename=0001-gnu-Add-font-un.patch >From 8cc2f10b46840096039d75b4edc910ad2cbbb274 Mon Sep 17 00:00:00 2001 From: Nils Gillmann Date: Sun, 6 Mar 2016 17:26:21 +0100 Subject: [PATCH] gnu: Add font-un. * gnu/packages/fonts.scm (font-un): New variable. --- gnu/packages/fonts.scm | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm index 69e195d..799d609 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -628,3 +628,75 @@ Unicode's Basic Multilingual Plane. The package also includes utilities to ease adding new glyphs to the font.") (home-page "http://unifoundry.com/unifont.html") (license license:gpl2+))) + +(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 . + (source (origin + (method url-fetch) + (uri (string-append + "http://krosos.sdf.org/static/unix/" + "un-fonts-core-" version "-080608" ".tar.gz")) + (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 + `(("source" ,source) + ("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") + ;; GPL + embed exception for documents / images + (license license:gpl2+))) -- 2.6.3 --=-=-= Content-Type: text/plain btw: can I change the default path where Gnus starts to search for Attachments to add? 99% of my attachments come from where guix is located. -- ng irc://loupsycedyglgamf.onion:67/~NiAsterisk https://psyced.org:34443/NiAsterisk/ EDN: https://wiki.c3d2.de/Echt_Dezentrales_Netz/en --=-=-=--