ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 22:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: texlive-texdoc: Fix script.

Browse source 
* gnu/packages/tex.scm (texlive-texdoc)[arguments]<#phases>: Prevent
a warning, and, more importantly, an error when using `texdoc' command.

Reported-by: Emmanuel Beffara <manu@beffara.org>
This commit is contained in:
Nicolas Goaziou 2023-08-28 19:50:17 +02:00
parent c8a642de9a
commit ea88bef3e0
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 25 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
gnu/packages/tex.scm
View file

@ -42838,7 +42838,31 @@ (define-public texlive-texdoc
"19mvh7pm2332f6c8nzgcbscm9vcz0apwfgm0m55ycibssc2fb3ww")))
(outputs '("out" "doc"))
(build-system texlive-build-system)
(arguments (list #:link-scripts #~(list "texdoc.tlu")))
(arguments
(list
#:link-scripts #~(list "texdoc.tlu")
#:phases
#~(modify-phases %standard-phases
;; The following phase prevents the following warning: "Info:
;; Running Texdoc not installed in the current TEXMFMAIN".
(add-after 'unpack 'eschew-warning
(lambda _
(substitute* "scripts/texdoc/texdoc.tlu"
(("if texmf ~= nil") "if false"))))
;; `kpse.find_file' is not able to locate "texlive.tlpdb", resulting
;; in the following error: "texdoc error: No texlive.tlpdb nor
;; shipped tlpdb data found". This phase explicitly points `texdoc'
;; into the right direction.
(add-after 'unpack 'set-tlpdb-location
(lambda* (#:key native-inputs inputs #:allow-other-keys)
(let ((tlpdb (search-input-file (or native-inputs inputs)
"/share/tlpkg/texlive.tlpdb")))
(substitute* "scripts/texdoc/texdoclib-const.tlu"
(("(local tlpdb=\").*" _ prefix)
(string-append prefix tlpdb "\"\n")))
(substitute* "scripts/texdoc/texdoclib-search.tlu"
(("(local texlive_tlpdb = ).*" _ prefix)
(string-append prefix "'" tlpdb "'\n")))))))))
(propagated-inputs (list texlive-kpathsea))
(home-page "https://ctan.org/pkg/texdoc")
(synopsis "Documentation access for TeX Live")