[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 0bbbe59 03/32: url-http-ntlm.el: Adjust blank lines
From: |
Thomas Fitzsimmons |
Subject: |
[elpa] master 0bbbe59 03/32: url-http-ntlm.el: Adjust blank lines |
Date: |
Thu, 18 Feb 2016 03:26:46 +0000 |
branch: master
commit 0bbbe59675c7a37f8dd3b0233b197f45ea8a1b20
Author: Thomas Fitzsimmons <address@hidden>
Commit: Thomas Fitzsimmons <address@hidden>
url-http-ntlm.el: Adjust blank lines
---
packages/url-http-ntlm/url-http-ntlm.el | 11 +----------
1 files changed, 1 insertions(+), 10 deletions(-)
diff --git a/packages/url-http-ntlm/url-http-ntlm.el
b/packages/url-http-ntlm/url-http-ntlm.el
index 309175f..7488416 100644
--- a/packages/url-http-ntlm/url-http-ntlm.el
+++ b/packages/url-http-ntlm/url-http-ntlm.el
@@ -90,24 +90,20 @@ Note that for any server, only one user and password is
ever stored.")
(:error
(url-http-ntlm-authorisation url :clear)))))
-
(defun url-ntlm-ensure-keepalive ()
(assert url-http-attempt-keepalives
nil
"NTLM authentication won't work unless `url-http-attempt-keepalives'
is set!"))
-
(defun url-ntlm-clean-headers ()
(setq url-http-extra-headers
(url-http-ntlm-rmssoc "Authorization" url-http-extra-headers)))
-
(defvar url-ntlm-last-args nil
"Stores the last ARGS argument to `url-ntlm-get-stage' and the return value.
This is
used to detect multiple calls.")
(make-variable-buffer-local 'url-ntlm-last-args)
-
(defun url-ntlm-get-stage (args)
"Determine what stage of the NTLM handshake we are at.
@@ -141,7 +137,6 @@ response's \"WWW-Authenticate\" header, munged by
`url-parse-args'."
(setq url-ntlm-last-args (cons args stage))
stage))))
-
(defun url-http-ntlm-authorisation (url &optional clear)
"Get or clear NTLM authentication details for URL. If CLEAR is
non-nil, clear any saved credentials for server. Otherwise,
@@ -186,7 +181,6 @@ stored."
;;
stored))))
-
(defun url-http-ntlm-get-challenge ()
"Return the NTLM Type-2 message in the WWW-Authenticate header,
if it is there."
@@ -197,17 +191,14 @@ if it is there."
www-authenticate)
(base64-decode-string (match-string 1 www-authenticate))))))
-
(defun url-http-ntlm-rmssoc (key alist)
(remove* key alist :key 'car :test 'equal))
-
(defun url-http-ntlm-string (data)
(concat "NTLM " (base64-encode-string data :nobreak)))
-
(url-register-auth-scheme "ntlm" nil 8)
-
(provide 'url-http-ntlm)
+
;;; url-http-ntlm.el ends here
- [elpa] master updated (1fc71ba -> 6682a04), Thomas Fitzsimmons, 2016/02/17
- [elpa] master ecee87e 01/32: url-http-ntlm: New package, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 087d353 02/32: url-http-ntlm: Remove trailing whitespace, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 0bbbe59 03/32: url-http-ntlm.el: Adjust blank lines,
Thomas Fitzsimmons <=
- [elpa] master 9e52a39 04/32: url-http-ntlm: Wrap lines at column 80, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 0799c67 05/32: url-http-ntlm: Fix checkdoc errors, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 8482b90 06/32: url-http-ntlm: Remove blank comment lines, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 50656c4 07/32: url-http-ntlm.el: Reindent whole file, Thomas Fitzsimmons, 2016/02/17
- [elpa] master cec4982 08/32: url-http-ntlm.el: Update copyright owner and years, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 2d39d5d 09/32: url-http-ntlm.el: Add maintainer header, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 3033c48 10/32: url-http-ntlm.el: Update installation instructions, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 19e93aa 11/32: url-http-ntlm.el: Update author's email address, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 6fb3a70 12/32: url-http-ntlm: Use url-http-ntlm namespace consistently, Thomas Fitzsimmons, 2016/02/17
- [elpa] master 4128f4f 13/32: url-http-ntlm.el (url-ntlm-auth): Move defun near end of file, Thomas Fitzsimmons, 2016/02/17