summaryrefslogtreecommitdiff
path: root/guix/scripts/processes.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-07-26 16:45:42 +0200
committerLudovic Courtès <ludo@gnu.org>2020-07-27 12:06:35 +0200
commit9296a2e511311d23dc49c4e4b3cbb9341ea82bb3 (patch)
treed389d808751ddf6c5eb7f4486f3b6d7abce49d74 /guix/scripts/processes.scm
parent578a1d794b18ca4e67eaa4b85afab3f5a9a874c5 (diff)
downloadguix-patches-9296a2e511311d23dc49c4e4b3cbb9341ea82bb3.tar
guix-patches-9296a2e511311d23dc49c4e4b3cbb9341ea82bb3.tar.gz
processes: Allow 'less' to properly estimate line length.
Until now, the first few lines in the output of 'guix processes' could disappear in 'less'. * guix/ui.scm (call-with-paginated-output-port): Add #:less-options parameter and honor it. (with-paginated-output-port): Allow callers to pass #:less-options. * guix/scripts/processes.scm (guix-processes): Pass #:less-options to 'with-paginated-output-port'.
Diffstat (limited to 'guix/scripts/processes.scm')
-rw-r--r--guix/scripts/processes.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/guix/scripts/processes.scm b/guix/scripts/processes.scm
index 01f7213e8c..35698a0216 100644
--- a/guix/scripts/processes.scm
+++ b/guix/scripts/processes.scm
@@ -235,4 +235,7 @@ List the current Guix sessions and their processes."))
(for-each (lambda (session)
(daemon-session->recutils session port)
(newline port))
- (daemon-sessions))))
+ (daemon-sessions))
+
+ ;; Pass 'R' (instead of 'r') so 'less' correctly estimates line length.
+ #:less-options "FRX"))