From f5cfadc72af0d3748c605ed4ab90a2b0765ce431 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Tue, 29 Aug 2023 15:58:54 +0200
Subject: [PATCH] gnu: Add texlive-prettytok.

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

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 96935e9841..ec69d2426f 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -92938,6 +92938,28 @@ (define-public texlive-prettyref
 @samp{sec:} part.")
     (license license:public-domain)))
 
+(define-public texlive-prettytok
+  (package
+    (name "texlive-prettytok")
+    (version (number->string %texlive-revision))
+    (source (texlive-origin
+             name version
+             (list "doc/latex/prettytok/"
+                   "tex/latex/prettytok/")
+             (base32
+              "1xz1q9n1jgscjsmbyccqwnxi57kzyxhm4bwqyix50pj1gywy27aw")))
+    (outputs '("out" "doc"))
+    (build-system texlive-build-system)
+    (propagated-inputs (list texlive-filecontentsdef texlive-l3kernel
+                             texlive-precattl))
+    (home-page "https://ctan.org/pkg/prettytok")
+    (synopsis "Pretty-print token lists")
+    (description
+     "This package pretty-prints token lists to HTML file for debugging purposes.
+Open the file in any browser to view the result.  It can be used to replace
+@code{\\tl_analysis_show:n}.")
+    (license license:lppl1.3c)))
+
 ;;;
 ;;; 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