[nongnu] elpa/request 8e6aaa5 05/11: Revert "add headers slot into request-response structure"

[ELPA Syncer]

branch: elpa/request
commit 8e6aaa540faca0096f0cfd19f5624a727cc3d60d
Author: dickmao <none>
Commit: dickmao <none>

    Revert "add headers slot into request-response structure"
    
    This reverts commit 2364e18b234d23c1092fa6e5dbf094a8371f05f2.
---
 request.el | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

diff --git a/request.el b/request.el
index 37e4aac..3827e12 100644
--- a/request.el
+++ b/request.el
@@ -181,7 +181,7 @@ for older Emacs versions.")
 (cl-defstruct request-response
   "A structure holding all relevant information of a request."
   status-code history data error-thrown symbol-status url
-  done-p settings headers
+  done-p settings
   ;; internal variables
   -buffer -raw-header -timer -backend)
 
@@ -535,14 +535,6 @@ and requests.request_ (Python).
         (when (re-search-forward "^$" nil t)
           (setf (request-response--raw-header response)
                 (buffer-substring (point-min) (point)))
-          (setf (request-response-headers response)
-                (let (headers)
-                  (with-temp-buffer
-                    (insert (request-response--raw-header response))
-                    (goto-char (point-min))
-                    (while (re-search-forward "^\\([^:\n]+\\): \\(.*\\)$" nil 
'no-error)
-                      (push `(,(match-string 1) . ,(match-string 2)) headers))
-                    (nreverse headers))))
           (request-log 'trace "request--cut-header: cutting\n%s"
                        (buffer-substring (point-min) (min (1+ (point)) 
(point-max))))
           (delete-region (point-min) (min (1+ (point)) (point-max))))))))