summaryrefslogtreecommitdiff
path: root/guix/build
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-10-14 16:43:08 +0200
committerLudovic Courtès <ludo@gnu.org>2021-10-14 16:45:06 +0200
commit5b81999c899e8dc1318b93a4dc62f6bab7382169 (patch)
treeb19ff0d4356483dab88adc9de52fed751427d6be /guix/build
parent2c3a0f248b5ce35da3d502f0cce555610d440772 (diff)
download: Print URL of the Disarchive spec being read.
* guix/build/download.scm (disarchive-fetch/any): Show URI of the Disarchive spec.
Diffstat (limited to 'guix/build')
-rw-r--r--guix/build/download.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/build/download.scm b/guix/build/download.scm
index f1943328d0..7c310e94f1 100644
--- a/guix/build/download.scm
+++ b/guix/build/download.scm
@@ -646,6 +646,8 @@ and write the output to FILE."
#:verify-certificate?
verify-certificate?
#:timeout timeout)))
+ (format #t "Retrieving Disarchive spec from ~a ...~%"
+ (uri->string uri))
(let ((specification (read port)))
(close-port port)
specification))))