[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 144bb0c: Allow binding `url-mime-accept-string'
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master 144bb0c: Allow binding `url-mime-accept-string' |
Date: |
Tue, 01 Mar 2016 03:51:42 +0000 |
branch: master
commit 144bb0cf322b9756d29def3e27a42303e2edce43
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Allow binding `url-mime-accept-string'
* lisp/url/url-http.el (url-http): Allow binding
`url-mime-accept-string' (bug#22855).
---
etc/NEWS | 4 ++++
lisp/url/url-http.el | 3 +++
2 files changed, 7 insertions(+), 0 deletions(-)
diff --git a/etc/NEWS b/etc/NEWS
index b1c1e6e..9ffd7b7 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -1102,6 +1102,10 @@ to specify that we're running in a noninteractive
context, and that
we should not be queried about things like TLS certificate validity.
---
+*** `url-mime-accept-string' can now be used as in "interface"
+variable, meaning you can bind it around an `url-retrieve' call.
+
+---
*** If URL is used with a https connection, the first callback argument
plist will contain a :peer element that has the output of
`gnutls-peer-status' (if Emacs is built with GnuTLS support).
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index d49e527..33f6d11 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -1210,6 +1210,7 @@ The return value of this function is the retrieval
buffer."
(and (boundp 'url-http-noninteractive)
url-http-noninteractive)))
(connection (url-http-find-free-connection host port gateway-method))
+ (mime-accept-string url-mime-accept-string)
(buffer (or retry-buffer
(generate-new-buffer
(format " *http %s:%d*" host port)))))
@@ -1245,6 +1246,7 @@ The return value of this function is the retrieval
buffer."
url-http-target-url
url-http-no-retry
url-http-connection-opened
+ url-mime-accept-string
url-http-proxy))
(set (make-local-variable var) nil))
@@ -1262,6 +1264,7 @@ The return value of this function is the retrieval
buffer."
url-http-target-url url-current-object
url-http-no-retry retry-buffer
url-http-connection-opened nil
+ url-mime-accept-string mime-accept-string
url-http-proxy url-using-proxy)
(set-process-buffer connection buffer)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 144bb0c: Allow binding `url-mime-accept-string',
Lars Ingebrigtsen <=