[elpa] externals/url-http-ntlm 544d008 27/42: url-http-ntlm: Shorten first line of some docstrings

[Stefan Monnier]

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

    url-http-ntlm: Shorten first line of some docstrings
    
    * url-http-ntlm.el (url-http-ntlm--last-args)
    (url-http-ntlm--default-users, url-http-ntlm--get-challenge):
    Shorten first line of documentation string.
---
 url-http-ntlm.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/url-http-ntlm.el b/url-http-ntlm.el
index 35f3c08..026a739 100644
--- a/url-http-ntlm.el
+++ b/url-http-ntlm.el
@@ -61,7 +61,7 @@ hashes>\).
 The hashes are built using `ntlm-get-password-hashes'.")
 
 (defvar url-http-ntlm--last-args nil
-  "Stores the last `url-http-ntlm--get-stage' arguments and return value.
+  "The last `url-http-ntlm--get-stage' arguments and result.
 This is used to detect multiple calls.")
 (make-variable-buffer-local 'url-http-ntlm--last-args)
 
@@ -70,8 +70,7 @@ This is used to detect multiple calls.")
 Keys are urls, entries are (START-TIME . COUNTER).")
 
 (defvar url-http-ntlm--default-users nil
-  "An alist that maps each server to the default username for
-that server.")
+  "An alist that stores one default username per server.")
 
 
 ;;; Private functions.
@@ -224,7 +223,8 @@ stored credentials are not affected."
        stored))))
 
 (defun url-http-ntlm--get-challenge ()
-  "Return the NTLM Type-2 message in the WWW-Authenticate header, if present."
+  "Return the NTLM Type-2 message in the WWW-Authenticate header.
+Return nil if the NTLM Type-2 message is not present."
   (save-restriction
     (mail-narrow-to-head)
     (let ((www-authenticate (mail-fetch-field "www-authenticate")))