From c041c360b7145997b723c66065b1a0a22265efe7 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 27 May 2020 12:12:46 +0200 Subject: system: hurd: Remove custom gexp compiler. This is superseded by , which was added in ef674a24c527eaf54801707d34dbf5d12ec139cb. * gnu/system/hurd.scm (compile-manifest): Remove. (cross-hurd-image)[system-profile]: Define using 'profile'. --- gnu/system/hurd.scm | 16 ++++------------ 1 file changed, 4 insertions(+), 12 deletions(-) diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm index 58bfdf88f6..3ccf47aa21 100644 --- a/gnu/system/hurd.scm +++ b/gnu/system/hurd.scm @@ -41,16 +41,6 @@ ;;; ;;; Code: -;; XXX: Surely this belongs in (guix profiles), but perhaps we need high-level -;; objects so one can specify hooks, etc.? -(define-gexp-compiler (compile-manifest (manifest - (@@ (guix profiles) )) - system target) - "Lower MANIFEST as a profile." - (profile-derivation manifest - #:system system - #:target target)) - (define %base-packages/hurd (list hurd bash coreutils file findutils grep sed guile-3.0 guile-colorized guile-readline @@ -71,8 +61,10 @@ (manifest-entry-dependencies entry))))) (define system-profile - (map-manifest-entries cross-built-entry - (packages->manifest %base-packages/hurd))) + (profile + (content + (map-manifest-entries cross-built-entry + (packages->manifest %base-packages/hurd))))) (define grub.cfg (let ((hurd (cross-built hurd)) -- cgit 1.4.1