gnu: chez-sockets: Replace texlive input with minimal texlive-union.
* gnu/packages/chez.scm (chez-sockets)[native-inputs]: Replace texlive with minimal texlive-union.
This commit is contained in:
parent
bc9319f42b
commit
1e0f2ae028
1 changed files with 9 additions and 4 deletions
|
@ -345,7 +345,7 @@ programming in Scheme.")
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("chez-scheme" ,chez-scheme)
|
`(("chez-scheme" ,chez-scheme)
|
||||||
("chez-web" ,chez-web)
|
("chez-web" ,chez-web)
|
||||||
("texlive" ,texlive)))
|
("texlive" ,(texlive-union (list texlive-generic-pdftex)))))
|
||||||
(arguments
|
(arguments
|
||||||
`(#:tests? #f ; no tests
|
`(#:tests? #f ; no tests
|
||||||
#:phases
|
#:phases
|
||||||
|
@ -361,11 +361,16 @@ programming in Scheme.")
|
||||||
(string-append var chez-h)))
|
(string-append var chez-h)))
|
||||||
#t)))
|
#t)))
|
||||||
(add-before 'build 'tangle
|
(add-before 'build 'tangle
|
||||||
(lambda _
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
|
(setenv "TEXINPUTS"
|
||||||
|
(string-append
|
||||||
|
(getcwd) ":"
|
||||||
|
(assoc-ref inputs "chez-web") "/share/texmf-local/tex/generic:"
|
||||||
|
":"))
|
||||||
;; just using "make" tries to build the .c files before
|
;; just using "make" tries to build the .c files before
|
||||||
;; they are created.
|
;; they are created.
|
||||||
(and (zero? (system* "make" "sockets"))
|
(and (invoke "make" "sockets")
|
||||||
(zero? (system* "make")))))
|
(invoke "make"))))
|
||||||
(replace 'build
|
(replace 'build
|
||||||
(lambda* (#:key outputs inputs #:allow-other-keys)
|
(lambda* (#:key outputs inputs #:allow-other-keys)
|
||||||
(let* ((out (assoc-ref outputs "out"))
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
|
|
Reference in a new issue