[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/06: status: Erase the current line upon new builds or downloads.
From: |
guix-commits |
Subject: |
02/06: status: Erase the current line upon new builds or downloads. |
Date: |
Mon, 11 Feb 2019 17:26:17 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit 5ea206a8a916ff055c1f3840e4a52ab2c123658f
Author: Ludovic Courtès <address@hidden>
Date: Mon Feb 11 22:47:06 2019 +0100
status: Erase the current line upon new builds or downloads.
* guix/status.scm (print-build-event): Add 'erase-current-line*' call
upon 'build-started, 'substituter-started, 'download-started.
---
guix/status.scm | 3 +++
1 file changed, 3 insertions(+)
diff --git a/guix/status.scm b/guix/status.scm
index cd5027e..bddaa00 100644
--- a/guix/status.scm
+++ b/guix/status.scm
@@ -506,6 +506,7 @@ addition to build events."
(match event
(('build-started drv . _)
+ (erase-current-line*)
(let ((properties (derivation-properties
(read-derivation-from-file drv))))
(match (assq-ref properties 'type)
@@ -552,10 +553,12 @@ addition to build events."
(format port (info (G_ "View build log at '~a'.")) log)))
(newline port))
(('substituter-started item _ ...)
+ (erase-current-line*)
(when (or print-log? (not (extended-build-trace-supported?)))
(format port (info (G_ "substituting ~a...")) item)
(newline port)))
(('download-started item uri _ ...)
+ (erase-current-line*)
(format port (info (G_ "downloading from ~a...")) uri)
(newline port))
(('download-progress item uri
- branch master updated (8d11b6d -> 2637cfd), guix-commits, 2019/02/11
- 04/06: git: Add an exception printer for 'git-error'., guix-commits, 2019/02/11
- 05/06: pack, vm: Fix incorrect use of 'package-transitive-propagated-inputs'., guix-commits, 2019/02/11
- 01/06: HACKING: Update key server., guix-commits, 2019/02/11
- 03/06: ui: Always print the exception upon load errors., guix-commits, 2019/02/11
- 02/06: status: Erase the current line upon new builds or downloads.,
guix-commits <=
- 06/06: Avoid name clash with 'build' from (guix store) and (guix status)., guix-commits, 2019/02/11