* lisp/url/url-http.el (url-http-create-request): Don't add extra \r\n after

http data.

Fixes: debbugs:16220

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 707419b..89efc71 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-08  Jarosław Rzeszótko  <sztywny@gmail.com>
+
+       * url-http.el (url-http-create-request): Don't add extra \r\n after
+       http data (bug#16220).
+
 2013-12-28  Glenn Morris  <rgm@gnu.org>
 
        * url-history.el (url-history-track):

diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index bb11ec9..ac2e140 100644 (file)
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -356,9 +356,7 @@ request.")
              ;; End request
              "\r\n"
              ;; Any data
-             url-http-data
-            ;; If `url-http-data' is nil, avoid two CRLFs (Bug#8931).
-            (if url-http-data "\r\n")))
+             url-http-data))
            ""))
     (url-http-debug "Request is: \n%s" request)
     request))