[Emacs-diffs] scratch/with-url 76a519e 3/5: Fix unsupported type case

[Lars Ingebrigtsen]

branch: scratch/with-url
commit 76a519ef33ea30503f4c7b23fb059be086723979
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Fix unsupported type case
---
 lisp/url/with-url.el |    1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/url/with-url.el b/lisp/url/with-url.el
index a086074..f801e09 100644
--- a/lisp/url/with-url.el
+++ b/lisp/url/with-url.el
@@ -234,6 +234,7 @@ If given, return the value in BUFFER instead."
     ("file" (with-url--fetch-file req))
     ("data" (with-url--fetch-data req))
     (_ (with-current-buffer (generate-new-buffer "*request*")
+         (setf (url-request-buffer req) (current-buffer))
          (with-url--callback nil '(500 "Unsupported URL") req)))))
 
 (defun with-url--fetch-http (req)