me
/
guix
Archived
1
0
Fork 0
Code

gnu: texlive-mptopdf: Fix package. 

* gnu/packages/tex.scm (texlive-mptopdf)[source]: Only grab specific
"mptopdf.pl" scripts, not all other scripts in the same directory.
[arguments]<#:phases>: Add a phase to use provided Perl.
[inputs]: Add PERL.
Nicolas Goaziou 2023-07-03 09:24:51 +02:00
parent 2e189e8863
commit 7e30fd530e
No known key found for this signature in database
GPG Key ID: DA00B4F048E92F2D
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
gnu/packages/tex.scm
View File

@ -1532,21 +1532,28 @@ information in the TFM file.")
(version (number->string %texlive-revision)) (version (number->string %texlive-revision))
(source (texlive-origin (source (texlive-origin
name version name version
;; The first location prevents from downloading all ConTeXt
;; "doc/context/scripts/mkii" directory.
(list "doc/context/scripts/mkii/mptopdf.man" (list "doc/context/scripts/mkii/mptopdf.man"
"doc/man/man1/mptopdf.1" "doc/man/man1/mptopdf.1"
"doc/man/man1/mptopdf.man1.pdf" "doc/man/man1/mptopdf.man1.pdf"
"scripts/context/perl/" "scripts/context/perl/mptopdf.pl"
"tex/context/base/mkii/" "tex/context/base/mkii/"
"tex/generic/context/mptopdf/") "tex/generic/context/mptopdf/")
(base32 (base32
"08z0hxq0645lf8jyl0wq3kwn1f7xsvj736sqgfin9ldd89zc2ch3"))) "19kpqbkmz8al9wxn83fmg89fyv2pl2iqgnh256wi6pz4q3p77f0d")))
(outputs '("out" "doc")) (outputs '("out" "doc"))
(build-system texlive-build-system) (build-system texlive-build-system)
(arguments (arguments
(list #:link-scripts #~(list "mptopdf.pl") (list
#:create-formats #~(list "mptopdf"))) #:link-scripts #~(list "mptopdf.pl")
#:create-formats #~(list "mptopdf")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-perl-header
(lambda* (#:key inputs #:allow-other-keys)
(let ((perl (search-input-file inputs "/bin/perl")))
(substitute* "scripts/context/perl/mptopdf.pl"
(("exec perl") (string-append "exec " perl)))))))))
(inputs (list perl))
(propagated-inputs (list texlive-plain)) (propagated-inputs (list texlive-plain))
(home-page "https://ctan.org/pkg/mptopdf") (home-page "https://ctan.org/pkg/mptopdf")
(synopsis "mpost to PDF, native MetaPost graphics inclusion") (synopsis "mpost to PDF, native MetaPost graphics inclusion")