summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-01-10 15:34:11 +0100
committerLudovic Courtès <ludo@gnu.org>2017-01-10 15:34:11 +0100
commitdd1141eba2cd92cde0fb7c4dc736fac533886a8d (patch)
treef2f005af48829a516e57d4b9825af5265782948b
parentb1a505baf61cc771197eb44af9173f31d2bace46 (diff)
downloadguix-dd1141eba2cd92cde0fb7c4dc736fac533886a8d.tar.gz
http-client: Improve error reporting.
* guix/http-client.scm (http-fetch): Change message in &message
condition to include URI, CODE, and the reason phrase.
-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))))))))))))
 
 
 ;;;