summaryrefslogtreecommitdiff
path: root/lisp/url/with-url.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2017-01-22 17:53:52 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2017-01-22 17:53:52 +0100
commit1af8637318e50e741bc58b2d073db5195f7ddbf7 (patch)
tree452649c9d82d6b6a668d9a584e18bd5b75c9c574 /lisp/url/with-url.el
parent6fac36611a08a256ef109eb5c8d8ebf838b59c46 (diff)
downloademacs-1af8637318e50e741bc58b2d073db5195f7ddbf7.tar.gz
Make network errors prettier
Diffstat (limited to 'lisp/url/with-url.el')
-rw-r--r--lisp/url/with-url.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/url/with-url.el b/lisp/url/with-url.el
index e3b1213aec7..a0860747dc2 100644
--- a/lisp/url/with-url.el
+++ b/lisp/url/with-url.el
@@ -370,7 +370,9 @@ If given, return the value in BUFFER instead."
;; connection ourselves.
)
(_ (with-url--callback
- process (list 500 (format "Network error: %s" change)) req)))))
+ process (list 500 (format "Network error: %s"
+ (replace-regexp-in-string "\n" "" change)))
+ req)))))
(defun with-url--unexpected-early-close ()
(goto-char (point-min))