From: Thomas Fitzsimmons Date: Tue, 27 Oct 2015 02:18:36 +0000 (-0400) Subject: url-http-ntlm.el (url-http-ntlm-last-args): Group defvar with others X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/55e7f423f5ee4b1d46e02df3bacd44b836b695e6 url-http-ntlm.el (url-http-ntlm-last-args): Group defvar with others --- diff --git a/packages/url-http-ntlm/url-http-ntlm.el b/packages/url-http-ntlm/url-http-ntlm.el index 302915f9d..47f57e0fc 100644 --- a/packages/url-http-ntlm/url-http-ntlm.el +++ b/packages/url-http-ntlm/url-http-ntlm.el @@ -53,6 +53,11 @@ The username can contain the domain name, in the form \"user@domain\". Note that for any server, only one user and password is ever stored.") +(defvar url-http-ntlm-last-args nil + "Stores the last `url-http-ntlm-get-stage' arguments and return value. +This is used to detect multiple calls.") +(make-variable-buffer-local 'url-http-ntlm-last-args) + (defun url-http-ntlm-ensure-keepalive () "Report an error if `url-http-attempt-keepalives' is not set." (assert url-http-attempt-keepalives @@ -65,11 +70,6 @@ Note that for any server, only one user and password is ever stored.") (setq url-http-extra-headers (url-http-ntlm-rmssoc "Authorization" url-http-extra-headers))) -(defvar url-http-ntlm-last-args nil - "Stores the last `url-http-ntlm-get-stage' arguments and return value. -This is used to detect multiple calls.") -(make-variable-buffer-local 'url-http-ntlm-last-args) - (defun url-http-ntlm-get-stage (args) "Determine what stage of the NTLM handshake we are at. PROMPT and ARGS come from `url-ntlm-auth''s caller,