me/guix
Archived
1
0
Fork 0
Code Activity

processes: Write to $PAGER.

Browse source 
* guix/ui.scm (with-paginated-output-port): Export.
* guix/scripts/processes.scm (guix-processes): Use it instead of writing
directly to (current-output-port).
This commit is contained in:
Ludovic Courtès 2020-06-28 22:36:43 +02:00
parent e1f2f3df84
commit 1acc5e11be
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
guix/scripts/processes.scm
View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2018, 2019 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -231,7 +231,8 @@ List the current Guix sessions and their processes."))
cons cons
'())) '()))
(for-each (lambda (session) (with-paginated-output-port port
(daemon-session->recutils session (current-output-port)) (for-each (lambda (session)
(newline)) (daemon-session->recutils session port)
(daemon-sessions))) (newline port))
(daemon-sessions))))

1
guix/ui.scm
View file

@ -121,6 +121,7 @@
file-hyperlink file-hyperlink
location->hyperlink location->hyperlink
with-paginated-output-port
relevance relevance
package-relevance package-relevance
display-search-results display-search-results