[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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- branch core-updates-frozen updated: installer: parted: Use the swap-space record.,
guix-commits <=