10/10: gnu: Add libtextstyle.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit ea54133367aad77a9e941fba18fe57ab3e1ab5d9
Author: Ludovic Courtès <address@hidden>
Date:   Wed May 22 00:00:06 2019 +0200

    gnu: Add libtextstyle.
    
    * gnu/packages/gettext.scm (libtextstyle): New variable.
---
 gnu/packages/gettext.scm | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/gnu/packages/gettext.scm b/gnu/packages/gettext.scm
index fd72b44..7d6d62a 100644
--- a/gnu/packages/gettext.scm
+++ b/gnu/packages/gettext.scm
@@ -142,6 +142,37 @@ translated messages from the catalogs.  Nearly all GNU 
packages use Gettext.")
     (native-inputs `(("emacs" ,emacs-minimal))) ; for Emacs tools
     (synopsis "Tools and documentation for translation")))
 
+(define-public libtextstyle
+  (package
+    (name "libtextstyle")
+    (version "0.20.1")
+    (source (origin
+              (inherit (package-source gnu-gettext))
+              (uri (string-append "mirror://gnu/gettext/gettext-"
+                                  version ".tar.gz"))
+              (sha256
+               (base32
+                "0p3zwkk27wm2m2ccfqm57nj7vqkmfpn7ja1nf65zmhz8qqs5chb6"))))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:configure-flags '("--disable-static")
+       #:phases (modify-phases %standard-phases
+                  (add-after 'unpack 'chdir
+                    (lambda _
+                      (chdir "libtextstyle")
+                      #t)))))
+    ;; libtextstyle bundles libxml2, glib (a small subset thereof), and
+    ;; libcroco, but it purposefully prevents users from using an external
+    ;; copy, to reduce the startup time of programs using libtextstyle.
+    (home-page "https://www.gnu.org/software/gettext/";)
+    (synopsis "Text styling library")
+    (description
+     "GNU libtextstyle is a C library that provides an easy way to add styling
+to programs that produce output to a console or terminal emulator window.  It
+allows applications to emit text annotated with styling information, such as
+color, font attributes (weight, posture), or underlining.")
+    (license gpl3+)))
+
 (define-public po4a
   (package
     (name "po4a")