installer: Log partition formatting.
* gnu/installer/newt/partition.scm (run-partitioning-page): Add 'syslog' call.master
parent
0105b8624d
commit
6d1fd37182
|
@ -777,5 +777,8 @@ by pressing the Exit button.~%~%")))
|
||||||
;; Make sure the disks are not in use before proceeding to formatting.
|
;; Make sure the disks are not in use before proceeding to formatting.
|
||||||
(free-parted non-install-devices)
|
(free-parted non-install-devices)
|
||||||
(format-user-partitions user-partitions-with-pass)
|
(format-user-partitions user-partitions-with-pass)
|
||||||
|
(syslog "formatted ~a user partitions~%"
|
||||||
|
(length user-partitions-with-pass))
|
||||||
|
|
||||||
(destroy-form-and-pop form)
|
(destroy-form-and-pop form)
|
||||||
user-partitions))
|
user-partitions))
|
||||||
|
|
Reference in New Issue