emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/url-http-ntlm f69bb6b 06/42: url-http-ntlm: Remove blan


From: Stefan Monnier
Subject: [elpa] externals/url-http-ntlm f69bb6b 06/42: url-http-ntlm: Remove blank comment lines
Date: Sat, 28 Nov 2020 17:19:43 -0500 (EST)

branch: externals/url-http-ntlm
commit f69bb6b5b65d048e2f0039551262616cb74cfe4e
Author: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Commit: Thomas Fitzsimmons <fitzsim@fitzsim.org>

    url-http-ntlm: Remove blank comment lines
    
    * url-http-ntlm.el (url-ntlm-auth, url-ntlm-get-stage): Remove blank
    comment lines.
---
 url-http-ntlm.el | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/url-http-ntlm.el b/url-http-ntlm.el
index 6981921..a98f462 100644
--- a/url-http-ntlm.el
+++ b/url-http-ntlm.el
@@ -73,14 +73,12 @@ the server's last response.  These are used by
   (url-ntlm-ensure-keepalive)
   (let ((stage (url-ntlm-get-stage args)))
     (case stage
-      ;;
       ;; NTLM Type 1 message: the request
       (:request
        (destructuring-bind (&optional server user hash)
            (url-http-ntlm-authorisation url)
          (when server
            (url-http-ntlm-string (ntlm-build-auth-request user server)))))
-      ;;
       ;; NTLM Type 3 message: the response
       (:response
        (let ((challenge (url-http-ntlm-get-challenge)))
@@ -129,7 +127,6 @@ response's \"WWW-Authenticate\" header, munged by
     (if (eq args (car url-ntlm-last-args))
         ;; multiple calls, return the same argument we returned last time
         (cdr url-ntlm-last-args)
-        ;;
         (let ((stage
                (cond ((and auth-header (string-match response-rxp
                                                      (cdr auth-header)))
@@ -190,7 +187,6 @@ stored."
                             (url-http-ntlm-rmssoc server
                                                   
url-http-ntlm-auth-storage))))
               entry)
-            ;;
             stored))))
 
 (defun url-http-ntlm-get-challenge ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]