installer: Use define instead of let at top-level.
* gnu/installer.scm (installer-program): Improve readability by using define at top-level. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
parent
0d37a5df7e
commit
4a68a00c8b
1 changed files with 41 additions and 41 deletions
|
@ -412,8 +412,8 @@ selected keymap."
|
||||||
;; verbose.
|
;; verbose.
|
||||||
(terminal-width 200)
|
(terminal-width 200)
|
||||||
|
|
||||||
(let* ((current-installer newt-installer)
|
(define current-installer newt-installer)
|
||||||
(steps (#$steps current-installer)))
|
(define steps (#$steps current-installer))
|
||||||
((installer-init current-installer))
|
((installer-init current-installer))
|
||||||
|
|
||||||
(catch #t
|
(catch #t
|
||||||
|
@ -455,7 +455,7 @@ selected keymap."
|
||||||
error-file report key args)))
|
error-file report key args)))
|
||||||
(primitive-exit 1)))
|
(primitive-exit 1)))
|
||||||
|
|
||||||
((installer-exit current-installer)))))))
|
((installer-exit current-installer))))))
|
||||||
|
|
||||||
(program-file
|
(program-file
|
||||||
"installer"
|
"installer"
|
||||||
|
|
Reference in a new issue