download: Print URL of the Disarchive spec being read.
* guix/build/download.scm (disarchive-fetch/any): Show URI of the Disarchive spec.master
parent
2c3a0f248b
commit
5b81999c89
|
@ -646,6 +646,8 @@ and write the output to FILE."
|
||||||
#:verify-certificate?
|
#:verify-certificate?
|
||||||
verify-certificate?
|
verify-certificate?
|
||||||
#:timeout timeout)))
|
#:timeout timeout)))
|
||||||
|
(format #t "Retrieving Disarchive spec from ~a ...~%"
|
||||||
|
(uri->string uri))
|
||||||
(let ((specification (read port)))
|
(let ((specification (read port)))
|
||||||
(close-port port)
|
(close-port port)
|
||||||
specification))))
|
specification))))
|
||||||
|
|
Reference in New Issue