From b95b7ee0178af9898045a1956c49f89ff58e43c3 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Mon, 27 May 2024 18:54:32 +0200
Subject: gnu: Add texlive-hitex-bin.

* gnu/packages/tex.scm (texlive-hitex-bin): New variable.
(texlive-hitex)[propagated-inputs]: Add TEXLIVE-HITEX-BIN.

Change-Id: I1d116623970d60261b366c5c48e05b2dcf53fbde
---
 gnu/packages/tex.scm | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

(limited to 'gnu')

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index d23f039a74..1ab2b1964d 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -16774,6 +16774,7 @@ Indian Type Foundry, with support for LaTeX and pdfLaTeX.")
            texlive-etex
            texlive-everyshi
            texlive-firstaid
+           texlive-hitex-bin
            texlive-hyphen-base
            texlive-knuth-lib
            texlive-l3backend
@@ -16800,6 +16801,35 @@ TeX to format a document for nearly-arbitrary values of @code{\\hsize} and
 @code{\\vsize}.")
     (license license:x11)))
 
+(define-public texlive-hitex-bin
+  (package
+    (inherit texlive-bin)
+    (name "texlive-hitex-bin")
+    (arguments
+     (substitute-keyword-arguments (package-arguments texlive-bin)
+       ((#:configure-flags flags)
+        #~(cons* "--disable-web2c"
+                 "--enable-hitex"
+                 (delete "--disable-hitex"
+                         (delete "--enable-web2c" #$flags))))
+       ((#:phases phases)
+        #~(modify-phases #$phases
+            (replace 'install
+              (lambda _
+                (with-directory-excursion "texk/web2c"
+                  (let ((bin (string-append #$output "/bin"))
+                        (files '("hishrink" "histretch" "hitex")))
+                    (for-each (lambda (f) (invoke "make" f)) files)
+                    (for-each (lambda (f) (install-file f bin)) files)
+                    (with-directory-excursion bin
+                      (symlink "hitex" "hilatex"))))))))))
+    (native-inputs (list pkg-config))
+    (home-page (package-home-page texlive-hitex))
+    (synopsis "Binaries for @code{texlive-hitex}")
+    (description
+     "This package provides the binaries for @code{texlive-hitex}.")
+    (license (package-license texlive-hitex))))
+
 (define-public texlive-hitszbeamer
   (package
     (name "texlive-hitszbeamer")
-- 
cgit 1.4.1