* gnu/installer/newt/partition.scm (run-partitioning-page): Do it.
---
gnu/installer/newt/partition.scm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/gnu/installer/newt/partition.scm b/gnu/installer/newt/partition.scm
index eda34e0461..2adb4922b4 100644
--- a/gnu/installer/newt/partition.scm
+++ b/gnu/installer/newt/partition.scm
@@ -795,13 +795,13 @@ (define (run-page devices)
(user-partitions (run-page eligible-devices))
(user-partitions-with-pass (prompt-luks-passwords
user-partitions))
- (form (draw-formatting-page user-partitions)))
+ (form (draw-formatting-page user-partitions-with-pass)))
;; Make sure the disks are not in use before proceeding to formatting.
(free-parted eligible-devices)
(format-user-partitions user-partitions-with-pass)
(installer-log-line "formatted ~a user partitions"
(length user-partitions-with-pass))
- (installer-log-line "user-partitions: ~a" user-partitions)
+ (installer-log-line "user-partitions: ~a" user-partitions-with-pass)
(destroy-form-and-pop form)
- user-partitions))
+ user-partitions-with-pass))
--
2.37.2
