From 76191f55c1a6df58792133eeea21a8bc5eaeaccf Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <othacehe@gnu.org>
Date: Tue, 23 Feb 2021 17:39:27 +0100
Subject: [PATCH] remote: Add log message.
* src/cuirass/remote-server.scm (run-fetch): Add log message.
---
src/cuirass/remote-server.scm | 1 +
1 file changed, 1 insertion(+)
diff --git a/src/cuirass/remote-server.scm b/src/cuirass/remote-server.scm
index 6003033d..882286ba 100644
--- a/src/cuirass/remote-server.scm
+++ b/src/cuirass/remote-server.scm
@@ -305,6 +305,7 @@ directory."
(match (zmq-read-message message)
(('build-succeeded ('drv drv) ('url url) _ ...)
(let ((outputs (build-outputs drv)))
+ (log-message "fetching '~a' from ~a" drv url)
(add-to-store outputs url)
(when (%trigger-substitute-url)
(trigger-substitutes-baking outputs (%trigger-substitute-url)))
--
GitLab