diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-11-18 10:28:02 +0000 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-11-18 10:28:33 +0000 |
| commit | 2e6d7d1e3408168545d5afd33ae8dd5a2881a22c (patch) | |
| tree | 7655a131bfe98449209389639294d87923367223 /lisp/emacs-lisp/package.el | |
| parent | 35d490fd324ded65f9859c16552240a14ac4e15b (diff) | |
| download | emacs-2e6d7d1e3408168545d5afd33ae8dd5a2881a22c.tar.gz emacs-2e6d7d1e3408168545d5afd33ae8dd5a2881a22c.tar.bz2 emacs-2e6d7d1e3408168545d5afd33ae8dd5a2881a22c.zip | |
* lisp/emacs-lisp/package.el (package--with-response-buffer):
Ensure we're at the start of the buffer before searching for
the end of headers.
Diffstat (limited to 'lisp/emacs-lisp/package.el')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 2aea9d11d1f..d747bc226a7 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1165,6 +1165,7 @@ BODY (does not apply to errors signaled by ERROR-FORM). (unwind-protect (wrap-errors (when-let ((er (plist-get status :error))) (error "Error retrieving: %s %S" url er)) + (goto-char (point-min)) (unless (search-forward-regexp "^\r?\n\r?" nil 'noerror) (error "Error retrieving: %s %S" url "incomprehensible buffer")) (with-temp-buffer |