diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2022-10-23 15:34:50 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-10-23 15:37:57 +0200 |
| commit | bf5e78d59fcb188d0bce02d93c93d06069178837 (patch) | |
| tree | 060da70dbbe64f220ee0557d8a116acdc366697b | |
| parent | 88fa3e6c3e46cbe324758fdf71b9c00e42f93069 (diff) | |
| download | guix-bf5e78d59fcb188d0bce02d93c93d06069178837.tar guix-bf5e78d59fcb188d0bce02d93c93d06069178837.tar.gz | |
installer: Resume newt in exit-error procedure.
Fixes: <https://issues.guix.gnu.org/58734>
* gnu/installer/newt.scm (exit-error): Resume it.
| -rw-r--r-- | gnu/installer/newt.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm index 1db78e6f0d..0bd0856219 100644 --- a/gnu/installer/newt.scm +++ b/gnu/installer/newt.scm @@ -62,6 +62,9 @@ (clear-screen)) (define (exit-error error) + ;; Newt may be suspended in the context of the "install-system" + ;; procedure. Resume it unconditionnally. + (newt-resume) (newt-set-color COLORSET-ROOT "white" "red") (define action (run-textbox-page |