]> code.delx.au - gnu-emacs-elpa/commitdiff
url-http-ntlm.el (url-http-ntlm-last-args): Group defvar with others
authorThomas Fitzsimmons <fitzsim@fitzsim.org>
Tue, 27 Oct 2015 02:18:36 +0000 (22:18 -0400)
committerThomas Fitzsimmons <fitzsim@fitzsim.org>
Thu, 18 Feb 2016 03:19:53 +0000 (22:19 -0500)
packages/url-http-ntlm/url-http-ntlm.el

index 302915f9dd7c2c94a44966135c63c3d55be592c3..47f57e0fc6238db8ebea2aa50655e95ae465a429 100644 (file)
@@ -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,