diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-02-19 12:08:40 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-02-22 00:45:42 +0100 |
| commit | 5c04b00cf463a543b8ffc9eb55991f6b4cc145dd (patch) | |
| tree | d8bc8b028c606a76f3c78a2872dfdd859d5a77ec /gnu/installer/steps.scm | |
| parent | 2cf65e1d543407bc7db43e7c7d39a215907efebc (diff) | |
| download | guix-5c04b00cf463a543b8ffc9eb55991f6b4cc145dd.tar.gz | |
installer: Log important bits to syslog.
* gnu/installer.scm (installer-program): Log crashes with 'syslog'. * gnu/installer/parted.scm (luks-format-and-open, luks-close) (mount-user-partitions, umount-user-partitions): Add 'syslog' calls. * gnu/installer/steps.scm (run-installer-steps): Log the running step with 'syslog'. * gnu/installer/utils.scm (run-shell-command): Add calls to 'syslog'.
Diffstat (limited to 'gnu/installer/steps.scm')
| -rw-r--r-- | gnu/installer/steps.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gnu/installer/steps.scm b/gnu/installer/steps.scm index 4e90f32f95..b2fc819d89 100644 --- a/gnu/installer/steps.scm +++ b/gnu/installer/steps.scm @@ -177,6 +177,7 @@ return the accumalated result so far." #:done-steps '()))))) ((installer-step-break? c) (reverse result))) + (syslog "running step '~a'~%" (installer-step-id step)) (let* ((id (installer-step-id step)) (compute (installer-step-compute step)) (res (compute result done-steps))) |