ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 15:36:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: noweb: Embed store references to external binaries.

Browse source 
* gnu/packages/noweb.scm (noweb)[argument]: Add ‘bind-early’ phase.
[inputs]: Add perl.
This commit is contained in:
Tobias Geerinckx-Rice 2020-01-15 01:31:20 +01:00
parent 2c31cf87e3
commit bd9f588b37
No known key found for this signature in database
GPG key ID: D889B0F018C5493C
1 changed files with 17 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/noweb.scm
View file

@ -1,5 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
@ -20,7 +21,8 @@ (define-module (gnu packages noweb)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix build-system gnu)
#:use-module (guix licenses))
#:use-module (guix licenses)
#:use-module (gnu packages perl))
(define-public noweb
(package
@ -37,6 +39,18 @@ (define-public noweb
(arguments
'(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'bind-early
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")))
(substitute* (list "src/lib/nwmtime"
"src/shell/htmltoc")
(("exec perl ")
(format #f "exec ~a " (which "perl"))))
(substitute* "src/shell/noweb"
((" cpif ")
(format #f " ~a/cpif " bin)))
#t)))
(add-before 'install 'pre-install
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
@ -82,6 +96,8 @@ (define-public noweb
(string-append "TEXINPUTS=" out
"/share/texmf/tex/latex")))
#:tests? #f)) ; no tests
(inputs
`(("perl" ,perl)))
(home-page "https://www.cs.tufts.edu/~nr/noweb/")
(synopsis "Literate programming tool")
(description