[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Ludovic Courtès |
Date: |
Tue, 23 Jan 2018 12:31:58 -0500 (EST) |
branch: master
commit f1b3a12c1df88cb61de0a1054ef0c9ce40c07958
Author: Ludovic Courtès <address@hidden>
Date: Tue Jan 23 18:31:35 2018 +0100
base: Use 'log-message' some more.
* src/cuirass/base.scm (build-packages): Use 'log-message' instead of
'format'.
---
src/cuirass/base.scm | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm
index e08df58..5e5422b 100644
--- a/src/cuirass/base.scm
+++ b/src/cuirass/base.scm
@@ -324,9 +324,9 @@ updating DB accordingly."
;; possible (we must be using #:keep-going? #t). Swallow build logs (the
;; daemon keeps them anyway), and swallow build errors.
(guard (c ((nix-protocol-error? c) #t))
- (format #t "load-path=~s\n" %load-path)
- (format #t "load-compiled-path=~s\n" %load-compiled-path)
- (format #t "building ~a derivations...~%" (length jobs))
+ (log-message "load-path=~s" %load-path)
+ (log-message "load-compiled-path=~s" %load-compiled-path)
+ (log-message "building ~a derivations" (length jobs))
(parameterize ((current-build-output-port
(build-event-output-port (lambda (event status)
(handle-build-event db event))
@@ -344,8 +344,8 @@ updating DB accordingly."
(outputs (map (cut assq-ref <> #:outputs) results))
(outs (filter-map (cut assoc-ref <> "out") outputs))
(fail (- (length jobs) success)))
- (format #t "outputs:\n~a\n" (string-join outs "\n"))
- (format #t "success: ~a, fail: ~a\n" success fail)
+ (log-message "outputs:\n~a" (string-join outs "\n"))
+ (log-message "success: ~a, fail: ~a" success fail)
results))
(define (prepare-git)
- master updated (f92ad70 -> f1b3a12), Ludovic Courtès, 2018/01/23
- [no subject], Ludovic Courtès, 2018/01/23
- [no subject], Ludovic Courtès, 2018/01/23
- [no subject], Ludovic Courtès, 2018/01/23
- [no subject], Ludovic Courtès, 2018/01/23
- [no subject], Ludovic Courtès, 2018/01/23
- [no subject],
Ludovic Courtès <=