From 62d2fc500abe7819837e1ddc0742232fd83139a6 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Tue, 29 Aug 2023 15:53:57 +0200
Subject: [PATCH] gnu: Add texlive-lcd.

* gnu/packages/tex.scm (texlive-lcd): New variable.
---
 gnu/packages/tex.scm | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index f22ceabb3c..c4e14e2d3d 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -86818,6 +86818,36 @@ slightly increase their spacing;
 @end itemize")
     (license license:lppl1.3c)))
 
+(define-public texlive-lcd
+  (package
+    (name "texlive-lcd")
+    (version (number->string %texlive-revision))
+    (source (texlive-origin
+             name version
+             (list "doc/latex/lcd/" "source/latex/lcd/"
+                   "tex/latex/lcd/")
+             (base32
+              "1iglq9rcdx2m9b7k2k2m10mc1k0xylxyqk4gwz3q1avp9vxdqpd8")))
+    (outputs '("out" "doc"))
+    (build-system texlive-build-system)
+    (arguments
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          ;; Do not stop build to ask about building part of the
+          ;; documentation.
+          (add-after 'unpack 'non-interactive-build
+            (lambda _
+              (substitute* "source/latex/lcd/lcd.ins"
+                (("\\\\generateexampletrue") "\\generateexamplefalse")))))))
+    (home-page "https://ctan.org/pkg/lcd")
+    (synopsis "Alphanumerical LCD-style displays")
+    (description
+     "This is a LaTeX package that will display text as on an
+(early) LCD display (the output is very visibly pixellated).  It assumes 8-bit
+input in its internal verbatim-style environment.")
+    (license license:lppl)))
+
 ;;;
 ;;; Avoid adding new packages to the end of this file. To reduce the chances
 ;;; of a merge conflict, place them above by existing packages with similar