From af7b8544dfa40c057e49d2e0878e269ed4c1d339 Mon Sep 17 00:00:00 2001 From: Hilton Chain Date: Wed, 11 Jun 2025 21:51:29 +0800 Subject: transformations: Add ‘nonguix-transformation-linux’. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * nonguix/transformations.scm (nonguix-transformation-linux): New procedure. --- nonguix/transformations.scm | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) (limited to 'nonguix') diff --git a/nonguix/transformations.scm b/nonguix/transformations.scm index ea38127..751c6cf 100644 --- a/nonguix/transformations.scm +++ b/nonguix/transformations.scm @@ -15,7 +15,8 @@ #:use-module (gnu packages package-management) #:use-module (nongnu packages linux) #:use-module (nongnu packages nvidia) - #:export (nonguix-transformation-guix)) + #:export (nonguix-transformation-guix + nonguix-transformation-linux)) (define* (nonguix-transformation-guix #:key (substitutes? #t) (channel? #t) @@ -75,3 +76,16 @@ FIXME: GUIX-SOURCE? is disabled by default due to performance issue." ,@(if substitutes? '("https://substitutes.nonguix.org") '())))))))))) + +(define* (nonguix-transformation-linux #:key (linux linux) + (firmware (list linux-firmware)) + (initrd microcode-initrd)) + "Return a procedure that transforms an operating system, setting up +LINUX (default: linux) kernel, with FIRMWARE (default: (list linux-firmware)) +and INITRD (default: microcode-initrd)." + (lambda (os) + (operating-system + (inherit os) + (kernel linux) + (firmware firmware) + (initrd initrd)))) -- cgit v1.2.3