installer: Increase backtrace verbosity.

* gnu/installer.scm (installer-program): Set terminal-width to 200 to
make guile backtraces more verbose.
This commit is contained in:
Mathieu Othacehe 2019-05-14 14:05:36 +02:00
parent ba2d913192
commit 3114786e3e
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 7 additions and 0 deletions

View File

@ -337,6 +337,8 @@ selected keymap."
(gnu services herd) (gnu services herd)
(guix i18n) (guix i18n)
(guix build utils) (guix build utils)
((system repl debug)
#:select (terminal-width))
(ice-9 match)) (ice-9 match))
;; Initialize gettext support so that installers can use ;; Initialize gettext support so that installers can use
@ -360,6 +362,11 @@ selected keymap."
(bindtextdomain "xkeyboard-config" (bindtextdomain "xkeyboard-config"
#+(file-append xkeyboard-config "/share/locale")) #+(file-append xkeyboard-config "/share/locale"))
;; Initialize 'terminal-width' in (system repl debug)
;; to a large-enough value to make backtrace more
;; verbose.
(terminal-width 200)
(let* ((current-installer newt-installer) (let* ((current-installer newt-installer)
(steps (#$steps current-installer))) (steps (#$steps current-installer)))
((installer-init current-installer)) ((installer-init current-installer))