me/guix
Archived
1
0
Fork 0
Code Activity

gnu: guix-build-coordinator: Propagate the guile inputs.

Browse source 
This means the package is usable as a library, which is useful when using the
procedures to send requests to the Guix Build Coordinator.

* gnu/packages/package-management.scm (guix-build-coordinator)[inputs]: Move
guile inputs to propagated inputs.
[propagated-inputs]: Receive some inputs.
* gnu/services/guix.scm (make-guix-build-coordinator-start-script): Adjust the
start script to include propagated inputs.
This commit is contained in:
Christopher Baines 2020-10-23 14:59:17 +01:00
parent 4b8acf715d
commit b0d6098f03
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
2 changed files with 10 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
gnu/packages/package-management.scm
View file

@ -1059,7 +1059,10 @@ environments.")
("guile" ,@(assoc-ref (package-native-inputs guix) "guile")))) ("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))))
(inputs (inputs
`(("guile" ,@(assoc-ref (package-native-inputs guix) "guile")) `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile"))
("guile-fibers" ,guile-fibers) ("sqlite" ,sqlite)
("sqitch" ,sqitch)))
(propagated-inputs
`(("guile-fibers" ,guile-fibers)
("guile-prometheus" ,guile-prometheus) ("guile-prometheus" ,guile-prometheus)
("guile-gcrypt" ,guile-gcrypt) ("guile-gcrypt" ,guile-gcrypt)
("guile-json" ,guile-json-3) ("guile-json" ,guile-json-3)
@ -1067,9 +1070,7 @@ environments.")
("guile-zlib" ,guile-zlib) ("guile-zlib" ,guile-zlib)
("guile-sqlite3" ,guile-sqlite3) ("guile-sqlite3" ,guile-sqlite3)
("guix" ,guix) ("guix" ,guix)
("gnutls" ,gnutls) ("gnutls" ,gnutls)))
("sqlite" ,sqlite)
("sqitch" ,sqitch)))
(home-page "https://git.cbaines.net/guix/build-coordinator/") (home-page "https://git.cbaines.net/guix/build-coordinator/")
(synopsis "Tool to help build derivations") (synopsis "Tool to help build derivations")
(description (description

7
gnu/services/guix.scm
View file

@ -188,8 +188,11 @@
;; libraries, but it means that the Guile libraries ;; libraries, but it means that the Guile libraries
;; needed for the Guix Build Coordinator don't need ;; needed for the Guix Build Coordinator don't need
;; to be individually specified here. ;; to be individually specified here.
(map second (package-inputs (append
guix-build-coordinator-package))) (map second (package-inputs
guix-build-coordinator-package))
(map second (package-propagated-inputs
guix-build-coordinator-package))))
#~(begin #~(begin
(use-modules (srfi srfi-1) (use-modules (srfi srfi-1)
(ice-9 match) (ice-9 match)