guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch core-updates-frozen updated: installer: parted: Use the swap-spac


From: guix-commits
Subject: branch core-updates-frozen updated: installer: parted: Use the swap-space record.
Date: Wed, 01 Dec 2021 15:10:38 -0500

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch core-updates-frozen
in repository guix.

The following commit(s) were added to refs/heads/core-updates-frozen by this 
push:
     new d64b78e  installer: parted: Use the swap-space record.
d64b78e is described below

commit d64b78ef0c5a8850fdd1626034a5b152a0be9bcc
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Wed Dec 1 20:59:06 2021 +0100

    installer: parted: Use the swap-space record.
    
    * gnu/installer/parted.scm (user-partitions->configuration): Use the
    swap-space record.
---
 gnu/installer/parted.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gnu/installer/parted.scm b/gnu/installer/parted.scm
index cbe6760..fadac36 100644
--- a/gnu/installer/parted.scm
+++ b/gnu/installer/parted.scm
@@ -1414,9 +1414,11 @@ USER-PARTITIONS, or return nothing."
             (let* ((uuids (map (lambda (file)
                                  (uuid->string (read-partition-uuid file)))
                                swap-devices)))
-              `((swap-devices (list ,@(map (lambda (uuid)
-                                             `(uuid ,uuid))
-                                           uuids))))))
+              `((swap-devices
+                 (list ,@(map (lambda (uuid)
+                                `(swap-space
+                                  (target (uuid ,uuid))))
+                              uuids))))))
       ,@(if (null? encrypted-partitions)
             '()
             `((mapped-devices



reply via email to

[Prev in Thread] Current Thread [Next in Thread]