mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
build-system/channel: Honor #:system.
* guix/build-system/channel.scm (build-channels): Pass #:system to ‘channel-instances->derivation’. (channel-build-system): Pass #:system to ‘arguments’. Reported-by: Rutherther <rutherther@ditigal.xyz> Change-Id: I989d110a0386d933ec5c40f7dd1ba03a37b31e5b Signed-off-by: Ludovic Courtès <ludo@gnu.org> Merges: #5930
This commit is contained in:
@@ -1,5 +1,5 @@
|
||||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2019-2022, 2024 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2019-2022, 2024, 2026 Ludovic Courtès <ludo@gnu.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@@ -60,7 +60,8 @@
|
||||
(return
|
||||
(list (checkout->channel-instance
|
||||
source #:commit commit))))))))
|
||||
(channel-instances->derivation instances)))
|
||||
(channel-instances->derivation instances
|
||||
#:system system)))
|
||||
|
||||
(define channel-build-system
|
||||
;; Build system used to "convert" a channel instance to a package.
|
||||
@@ -72,6 +73,7 @@
|
||||
(system system)
|
||||
(build build-channels)
|
||||
(arguments `(#:source ,source
|
||||
#:system ,system
|
||||
#:channels ,channels
|
||||
#:authenticate? ,authenticate?
|
||||
#:commit ,commit))))))
|
||||
|
||||
Reference in New Issue
Block a user