[bug#27972] [fonts] font-lato

[ng0]

No comment since August. Can someone give it a review and push?

Thanks!
ng0 transcribed 3.9K bytes:
> This adds the Lato 2.010 font.
> -- 
> ng0
> GnuPG: A88C8ADD129828D7EAC02E52E22F9BBFEE348588
> GnuPG: https://n0is.noblogs.org/my-keys
> https://www.infotropique.org https://krosos.org

> From ba987b01c4e394989989c0647e292117cf6faf82 Mon Sep 17 00:00:00 2001
> From: ng0 <address@hidden>
> Date: Sat, 5 Aug 2017 17:21:23 +0000
> Subject: [PATCH] gnu: Add font-lato.
> 
> * gnu/packages/fonts.scm (font-lato): New variable.
> ---
>  gnu/packages/fonts.scm | 39 +++++++++++++++++++++++++++++++++++++++
>  1 file changed, 39 insertions(+)
> 
> diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
> index 51073eff9..8cdef4689 100644
> --- a/gnu/packages/fonts.scm
> +++ b/gnu/packages/fonts.scm
> @@ -170,6 +170,45 @@ itself."))))
>  sans-serif designed for on-screen reading.  It is used by address@hidden")
>      (license license:silofl1.1)))
>  
> +(define-public font-lato
> +  (package
> +    (name "font-lato")
> +    (version "2.010")
> +    (source (origin
> +              (method url-fetch)
> +              (uri (string-append 
> "http://www.latofonts.com/download/Lato2OFL.zip";))
> +              (sha256
> +               (base32
> +                "1f5540g0ja1nx3ddd3ywn77xc81ssrxpq8n3gyb9sabyq2b4xda2"))))
> +    (build-system trivial-build-system)
> +    (arguments
> +     `(#:modules ((guix build utils))
> +       #:builder (begin
> +                   (use-modules (guix build utils)
> +                                (srfi srfi-26))
> +
> +                   (let ((PATH     (string-append (assoc-ref %build-inputs
> +                                                             "unzip")
> +                                                  "/bin"))
> +                         (font-dir (string-append %output
> +                                                  "/share/fonts/truetype")))
> +                     (setenv "PATH" PATH)
> +                     (system* "unzip" (assoc-ref %build-inputs "source"))
> +
> +                     (mkdir-p font-dir)
> +                     (for-each (lambda (ttf)
> +                                 (install-file ttf font-dir))
> +                               (find-files "." "\\.ttf$"))))))
> +
> +    (native-inputs `(("unzip" ,unzip)))
> +    (home-page "http://www.latofonts.com/lato-free-fonts/";)
> +    (synopsis "Lato sans-serif typeface")
> +    (description
> +     "Lato is a sanserif typeface family.  It covers over 3000 glyphs per 
> style.
> +The Lato 2.010 family supports more than 100 Latin-based languages, over
> +50 Cyrillic-based languages as well as Greek and IPA phonetics.")
> +    (license license:silofl1.1)))
> +
>  (define-public font-gnu-freefont-ttf
>    (package
>      (name "font-gnu-freefont-ttf")
> -- 
> 2.13.4
> 




-- 
GnuPG: A88C8ADD129828D7EAC02E52E22F9BBFEE348588
GnuPG: https://c.n0.is/ng0_pubkeys/tree/keys
  WWW: https://n0.is

signature.asc
Description: PGP signature