From 3114786e3ed1cadf993d9ae87baa2a0a96a2c36c Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <m.othacehe@gmail.com>
Date: Tue, 14 May 2019 14:05:36 +0200
Subject: installer: Increase backtrace verbosity.

* gnu/installer.scm (installer-program): Set terminal-width to 200 to
make guile backtraces more verbose.
---
 gnu/installer.scm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'gnu')

diff --git a/gnu/installer.scm b/gnu/installer.scm
index ea7bd1c932..1452c4dc7e 100644
--- a/gnu/installer.scm
+++ b/gnu/installer.scm
@@ -337,6 +337,8 @@ (define installer-builder
                          (gnu services herd)
                          (guix i18n)
                          (guix build utils)
+                         ((system repl debug)
+                          #:select (terminal-width))
                          (ice-9 match))
 
             ;; Initialize gettext support so that installers can use
@@ -360,6 +362,11 @@ (define installer-builder
             (bindtextdomain "xkeyboard-config"
                             #+(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)
                    (steps (#$steps current-installer)))
               ((installer-init current-installer))
-- 
cgit v1.2.3