diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2023-08-21 19:16:05 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2023-08-21 19:16:05 +0200 |
| commit | 4fb9d524357958f765763d5816af55f234b026d5 (patch) | |
| tree | 223f3df8986a1fb4352294ff649a6a21e45e56fc /gnu | |
| parent | 4cdbbfa48d87d9a500288249f228fd19d4371919 (diff) | |
ci: Really honor system type for manifests.
* gnu/ci.scm (manifests->jobs): Pass SYSTEM to 'lower-object'.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/ci.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm index 7771add033b..520ac281101 100644 --- a/gnu/ci.scm +++ b/gnu/ci.scm | |||
| @@ -438,7 +438,7 @@ names, for each one of SYSTEMS." | |||
| 438 | (let* ((obj (manifest-entry-item entry)) | 438 | (let* ((obj (manifest-entry-item entry)) |
| 439 | (drv (parameterize ((%graft? #f)) | 439 | (drv (parameterize ((%graft? #f)) |
| 440 | (run-with-store store | 440 | (run-with-store store |
| 441 | (lower-object obj) | 441 | (lower-object obj system) |
| 442 | #:system system))) | 442 | #:system system))) |
| 443 | (max-silent-time (or (and (package? obj) | 443 | (max-silent-time (or (and (package? obj) |
| 444 | (assoc-ref (package-properties obj) | 444 | (assoc-ref (package-properties obj) |