mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 06:18:07 -05:00
gnu: texlive-bin: Include scripts.
* gnu/packages/tex.scm (texlive-bin)[inputs]: Add texlive-scripts. [arguments]: Let fmtutil.pl reference scripts directory.
This commit is contained in:
parent
2b25469476
commit
dfdc002c9b
1 changed files with 21 additions and 0 deletions
|
@ -271,6 +271,20 @@ (define-public texlive-bin
|
|||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
`(("texlive-extra-src" ,texlive-extra-src)
|
||||
("texlive-scripts"
|
||||
,(origin
|
||||
(method svn-fetch)
|
||||
(uri (svn-reference
|
||||
(url (string-append "svn://www.tug.org/texlive/tags/"
|
||||
%texlive-tag "/Master/texmf-dist/"
|
||||
"/scripts/texlive"))
|
||||
(revision %texlive-revision)))
|
||||
(file-name (string-append "texlive-scripts-"
|
||||
(number->string %texlive-revision)
|
||||
"-checkout"))
|
||||
(sha256
|
||||
(base32
|
||||
"0wrjls1y9b4k1z10l9l8w2l3yjcw7v7by2y16kchdpkiyldlkry6"))))
|
||||
("cairo" ,cairo)
|
||||
("fontconfig" ,fontconfig)
|
||||
("fontforge" ,fontforge)
|
||||
|
@ -386,6 +400,13 @@ (define-public texlive-bin
|
|||
(apply unpack (list #:source texlive-extra))
|
||||
(apply patch-source-shebangs (list #:source texlive-extra))
|
||||
(invoke "mv" "tlpkg" share))
|
||||
(let ((scripts (string-append share "/texmf-dist/scripts/texlive/")))
|
||||
(mkdir-p scripts)
|
||||
(copy-recursively (assoc-ref inputs "texlive-scripts") scripts)
|
||||
;; Make sure that fmtutil can find its Perl modules.
|
||||
(substitute* (string-append scripts "fmtutil.pl")
|
||||
(("\\$TEXMFROOT/") (string-append share "/"))))
|
||||
|
||||
;; texlua shebangs are not patched by the patch-source-shebangs
|
||||
;; phase because the texlua executable does not exist at that
|
||||
;; time.
|
||||
|
|
Loading…
Reference in a new issue