diff options
| author | Andreas Schwab <schwab@suse.de> | 2004-11-28 19:14:11 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2004-11-28 19:14:11 +0000 |
| commit | dc1a0a7a28a2d8a53c331368c2df41c4bec360bb (patch) | |
| tree | 3bc0a59219c112cacb3eb4aedbf3126ba9dfd464 /lisp/url | |
| parent | 180ee7c785192ad92b7078e81f4b235198b171df (diff) | |
| download | emacs-dc1a0a7a28a2d8a53c331368c2df41c4bec360bb.tar.gz | |
(url-http-create-request): Don't add newline after
the request data.
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/url/url-http.el | 9 |
2 files changed, 10 insertions, 4 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 8f97d48bc46..7a527f943e3 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,3 +1,8 @@ +2004-11-28 Andreas Schwab <schwab@suse.de> + + * url-http.el (url-http-create-request): Don't add newline after + the request data. + 2004-11-20 Masatake YAMATO <jet@gyve.org> * url.el (url-mm-callback): Delay the invocation diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 200025c3804..a3fd54e3cba 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -255,15 +255,16 @@ request. (if ref-url (concat "Referer: " ref-url "\r\n")) extra-headers - ;; Any data + ;; Length of data (if url-request-data (concat "Content-length: " (number-to-string (length url-request-data)) - "\r\n\r\n" - url-request-data)) + "\r\n")) ;; End request - "\r\n")) + "\r\n" + ;; Any data + url-request-data)) (url-http-debug "Request is: \n%s" request) request)) |