summaryrefslogtreecommitdiff
path: root/lisp/url/url-vars.el
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen <larsi@gnus.org>2014-11-23 15:05:18 +0100
committerLars Magne Ingebrigtsen <larsi@gnus.org>2014-11-23 15:05:18 +0100
commita345ff6bf2af54db2ee03296965165127f7758ec (patch)
treede73d6a88dca950fca75e41bf0c7bcf120713cb0 /lisp/url/url-vars.el
parentc43b706ab3a699c107a91d1ab6f16014fff65b54 (diff)
downloademacs-a345ff6bf2af54db2ee03296965165127f7758ec.tar.gz
Implement a new url parameter `url-request-noninteractive'
* url-http.el (url-http): Respect `url-request-noninteractive'. * url-queue.el (url-queue-start-retrieve): Fetching through url-queue should always be noninteractive. * url-vars.el (url-request-noninteractive): New variable.
Diffstat (limited to 'lisp/url/url-vars.el')
-rw-r--r--lisp/url/url-vars.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el
index 62b7b855533..bc23b982f82 100644
--- a/lisp/url/url-vars.el
+++ b/lisp/url/url-vars.el
@@ -209,6 +209,9 @@ document."
"A list of extra headers to send with the next request.
Should be an assoc list of headers/contents.")
+(defvar url-request-noninteractive nil
+ "If non-nil, the request is done in a noninteractive context.")
+
(defvar url-request-method nil "The method to use for the next request.")
(defvar url-mime-encoding-string (and (fboundp 'zlib-available-p)