diff options
author | Ludovic Courtès <ludo@gnu.org> | 2021-10-14 16:43:08 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-10-14 16:45:06 +0200 |
commit | 5b81999c899e8dc1318b93a4dc62f6bab7382169 (patch) | |
tree | b19ff0d4356483dab88adc9de52fed751427d6be | |
parent | 2c3a0f248b5ce35da3d502f0cce555610d440772 (diff) | |
download | guix-5b81999c899e8dc1318b93a4dc62f6bab7382169.tar.gz |
download: Print URL of the Disarchive spec being read.
* guix/build/download.scm (disarchive-fetch/any): Show URI of the Disarchive spec.
-rw-r--r-- | guix/build/download.scm | 2 |
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)))) |