ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: sicp: Add the HTML version.

Browse source 
* gnu/packages/scheme.scm (sicp)[arguments]: Copy the HTML directory to the
output.
This commit is contained in:
Clément Lassieur 2017-05-30 08:56:34 +02:00
parent 3e9afff873
commit 01d71f6222
No known key found for this signature in database
GPG key ID: 89F96D4808F359C7
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
gnu/packages/scheme.scm
View file

@ -7,6 +7,7 @@
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2016, 2017 ng0 <contact.ng0@cryptolab.net> ;;; Copyright © 2016, 2017 ng0 <contact.ng0@cryptolab.net>
;;; Copyright © 2017 John Darrington <jmd@gnu.org> ;;; Copyright © 2017 John Darrington <jmd@gnu.org>
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -780,7 +781,9 @@ (define-public sicp
(let ((gzip (assoc-ref %build-inputs "gzip")) (let ((gzip (assoc-ref %build-inputs "gzip"))
(source (assoc-ref %build-inputs "source")) (source (assoc-ref %build-inputs "source"))
(texinfo (assoc-ref %build-inputs "texinfo")) (texinfo (assoc-ref %build-inputs "texinfo"))
(html-dir (string-append %output "/share/doc/" ,name "/html"))
(info-dir (string-append %output "/share/info"))) (info-dir (string-append %output "/share/info")))
(copy-recursively (string-append source "/html") html-dir)
(setenv "PATH" (string-append gzip "/bin" (setenv "PATH" (string-append gzip "/bin"
":" texinfo "/bin")) ":" texinfo "/bin"))
(mkdir-p info-dir) (mkdir-p info-dir)