diff options
author | Christopher Baines <mail@cbaines.net> | 2025-02-03 13:06:45 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2025-02-03 13:06:45 +0100 |
commit | acdedb075d144bddd12bf6260fa38ba654f90819 (patch) | |
tree | ac0d78b335b2687e206e9bdfcd6614b89a412658 | |
parent | f9e6daad99b697d31a9cbccacf8ca590e1e9e99f (diff) | |
download | data-service-acdedb075d144bddd12bf6260fa38ba654f90819.tar data-service-acdedb075d144bddd12bf6260fa38ba654f90819.tar.gz |
Ensure COLUMNS is set
-rw-r--r-- | scripts/guix-data-service.in | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/scripts/guix-data-service.in b/scripts/guix-data-service.in index 172838f..2244c0e 100644 --- a/scripts/guix-data-service.in +++ b/scripts/guix-data-service.in @@ -137,6 +137,9 @@ (setvbuf (current-output-port) 'line) (setvbuf (current-error-port) 'line) +(unless (getenv "COLUMNS") + (setenv "COLUMNS" "128")) + (let ((opts (parse-options (cdr (program-arguments))))) (when (assq-ref opts 'repl) ((@@ (ice-9 top-repl) call-with-sigint) |