branch: externals/plz
commit da503527d2580e8e3218d77b33626bddbc7c3942
Author: Adam Porter <a...@alphapapa.net>
Commit: Adam Porter <a...@alphapapa.net>
Change: (plz--response) Error if unable to parse HTTP response
Definitely seems like the right thing to do.
---
plz.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/plz.el b/plz.el
index 81c2112d84..857f315b1b 100644
--- a/plz.el
+++ b/plz.el
@@ -459,7 +459,8 @@ according to the apparent coding system."
(save-excursion
(goto-char (point-min))
;; Parse HTTP version and status code.
- (looking-at plz-http-response-status-line-regexp)
+ (unless (looking-at plz-http-response-status-line-regexp)
+ (error "Unable to parse HTTP response"))
(let* ((http-version (string-to-number (match-string 1)))
(status-code (string-to-number (match-string 2)))
(headers (plz--headers))
