aboutsummaryrefslogtreecommitdiff
path: root/guix/http-client.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/http-client.scm')
-rw-r--r--guix/http-client.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix/http-client.scm b/guix/http-client.scm
index cc3acc9587..0090783524 100644
--- a/guix/http-client.scm
+++ b/guix/http-client.scm
@@ -276,7 +276,12 @@ Raise an '&http-get-error' condition if downloading fails."
(code code)
(reason (response-reason-phrase resp)))
(&message
- (message "download failed"))))))))))
+ (message
+ (format
+ #f
+ (_ "~a: HTTP download failed: ~a (~s)")
+ (uri->string uri) code
+ (response-reason-phrase resp))))))))))))
;;;