diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2008-07-02 11:14:38 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2008-07-02 11:14:38 +0000 |
commit | d1ce47b068062c1d6373e5add5abfbab0114ccb3 (patch) | |
tree | cd2ce3e726e040f880af239e1e6eb432fd6a75b8 /lisp/url/url-http.el | |
parent | 1d344f142ac4bff89bc7f65e03af30c69afc449b (diff) | |
download | emacs-d1ce47b068062c1d6373e5add5abfbab0114ccb3.tar.gz emacs-d1ce47b068062c1d6373e5add5abfbab0114ccb3.tar.bz2 emacs-d1ce47b068062c1d6373e5add5abfbab0114ccb3.zip |
Typo and docstring fixes.
* url.el (url-do-setup):
* url-dired.el (url-dired-minor-mode):
* url-file.el (url-file-find-possibly-compressed-file):
* url-gw.el (url-gateway-broken-resolution):
* url-handlers.el (url-handler-regexp):
* url-imap.el (url-imap-default-port):
* url-methods.el (url-scheme-get-property): Fix typos in docstrings.
* url-auth.el (url-basic-auth-storage, url-digest-auth):
Fix typos in docstrings.
(url-digest-auth-storage, url-register-auth-scheme): Reflow docstrings.
* url-cache.el (url-cache-prepare): Doc fix.
(url-cache-create-filename-human-readable, url-cache-extract):
Fix typos in docstrings.
* url-dav.el (url-intersection, url-dav-iso8601-regexp)
(url-dav-delete-something): Fix typos in docstrings.
(url-dav-http-success-p, url-dav-file-name-all-completions)
(url-dav-directory-files, url-dav-file-name-completion): Doc fixes.
* url-http.el (url-http-idle-sentinel): Doc fix.
* url-irc.el (url-irc-default-port): Fix typo in docstring.
(url-irc-function): Doc fix.
* url-util.el (url-get-url-filename-chars, url-unhex-string):
Fix typos in docstrings.
(url-file-extension): Doc fix.
* url-vars.el (url-current-object, url-current-mime-headers)
(url-privacy-level, url-mail-command, url-mime-language-string):
Fix typos in docstrings.
(url-honor-refresh-requests): Reflow docstring.
(url-using-proxy): Doc fix.
Diffstat (limited to 'lisp/url/url-http.el')
-rw-r--r-- | lisp/url/url-http.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index bd3d3cb075a..0a3acff31a1 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -153,7 +153,7 @@ request.") (defun url-http-create-request (&optional ref-url) "Create an HTTP request for `url-http-target-url', referred to by REF-URL." - (declare (special proxy-info + (declare (special proxy-info url-http-method url-http-data url-http-extra-headers)) (let* ((extra-headers) @@ -323,10 +323,10 @@ This allows us to use `mail-fetch-field', etc." ;; find strongest supported auth (dolist (this-auth auths) - (setq this-auth (url-eat-trailing-space - (url-strip-leading-spaces + (setq this-auth (url-eat-trailing-space + (url-strip-leading-spaces this-auth))) - (let* ((this-type + (let* ((this-type (if (string-match "[ \t]" this-auth) (downcase (substring this-auth 0 (match-beginning 0))) (downcase this-auth))) @@ -418,7 +418,7 @@ should be shown to the user." ;; "Connection: keep-alive" header. ;; In HTTP 1.1 (and greater), keep the connection unless there is a ;; "Connection: close" header - (cond + (cond ((string= url-http-response-version "1.0") (unless (and connection (string= (downcase connection) "keep-alive")) @@ -800,7 +800,7 @@ should be shown to the user." ;; These unfortunately cannot be macros... please ignore them! (defun url-http-idle-sentinel (proc why) - "Remove this (now defunct) process PROC from the list of open connections." + "Remove (now defunct) process PROC from the list of open connections." (maphash (lambda (key val) (if (memq proc val) (puthash key (delq proc val) url-http-open-connections))) |