ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-24 11:39:46 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: ecl: Remove build-stamp to improve reproducibility.

Browse source 
* gnu/packages/lisp.scm (ecl)[arguments]<phases>: Add "remove-build-stamp"
  phase. Move "wrap" phase after "remove-build-stamp" phase.

Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
This commit is contained in:
Zhu Zihao 2020-12-12 10:34:37 +08:00 committed by Guillaume Le Vaillant
parent e3f538969e
commit 20a964149c
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gnu/packages/lisp.scm
View file

@ -16,6 +16,7 @@
;;; Copyright © 2019 Jesse Gildersleve <jessejohngildersleve@protonmail.com> ;;; Copyright © 2019 Jesse Gildersleve <jessejohngildersleve@protonmail.com>
;;; Copyright © 2019, 2020 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2019, 2020 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2020 Zhu Zihao <all_but_last@163.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -258,7 +259,12 @@ (define-public ecl
(contrib-asdf "contrib/asdf/asdf.lisp")) (contrib-asdf "contrib/asdf/asdf.lisp"))
(copy-file guix-asdf contrib-asdf)) (copy-file guix-asdf contrib-asdf))
#t)) #t))
(add-after 'install 'wrap (add-after 'install 'remove-build-stamp
(lambda* (#:key outputs #:allow-other-keys)
(delete-file (string-append (assoc-ref outputs "out")
"/lib/ecl-" ,version "/build-stamp"))
#t))
(add-after 'remove-build-stamp 'wrap
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((ecl (assoc-ref outputs "out")) (let* ((ecl (assoc-ref outputs "out"))
(input-path (lambda (lib path) (input-path (lambda (lib path)