ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-27 06:42:14 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: node-lts: Simplify snippet.

Browse source 
* gnu/packages/node.scm (node-lts)[source]: Remove quasiquote, trailing #T,
and IF with explicit booleans.
This commit is contained in:
Ricardo Wurmus 2023-07-13 10:30:14 +02:00
parent 00ed2901f5
commit 529d91de1e
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 4 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/node.scm
View file

@ -7,7 +7,7 @@
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018-2022 Marius Bakke <marius@gnu.org> ;;; Copyright © 2018-2022 Marius Bakke <marius@gnu.org>
;;; Copyright © 2020, 2021 Pierre Langlois <pierre.langlois@gmx.com> ;;; Copyright © 2020, 2021 Pierre Langlois <pierre.langlois@gmx.com>
;;; Copyright © 2020 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2020, 2023 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com> ;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2021, 2022 Philip McGrath <philip@philipmcgrath.com> ;;; Copyright © 2021, 2022 Philip McGrath <philip@philipmcgrath.com>
@ -748,13 +748,12 @@ (define-public node-lts
"0vcc132z7lkxnw5clmiz6sp6ccmw35pyb69hczphrig5frfmqkva")) "0vcc132z7lkxnw5clmiz6sp6ccmw35pyb69hczphrig5frfmqkva"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
`(begin '(begin
;; openssl.cnf is required for build. ;; openssl.cnf is required for build.
(for-each delete-file-recursively (for-each delete-file-recursively
(find-files "deps/openssl" (find-files "deps/openssl"
(lambda (file stat) (lambda (file stat)
(if (string-contains file "nodejs-openssl.cnf") (not (string-contains file "nodejs-openssl.cnf")))))
#f #t))))
;; Remove bundled software, where possible ;; Remove bundled software, where possible
(for-each delete-file-recursively (for-each delete-file-recursively
'("deps/cares" '("deps/cares"
@ -764,8 +763,7 @@ (define-public node-lts
(substitute* "Makefile" (substitute* "Makefile"
;; Remove references to bundled software. ;; Remove references to bundled software.
(("deps/uv/uv.gyp") "") (("deps/uv/uv.gyp") "")
(("deps/zlib/zlib.gyp") "")) (("deps/zlib/zlib.gyp") ""))))))
#t))))
(arguments (arguments
(substitute-keyword-arguments (package-arguments node) (substitute-keyword-arguments (package-arguments node)
((#:configure-flags configure-flags) ((#:configure-flags configure-flags)