Package archive location needs to be absolute filename
* lisp/emacs-lisp/package.el (package--with-response-buffer-1): Actually check that URL is absolute (bug#49788).
This commit is contained in:
committed by
Lars Ingebrigtsen
parent
b8c43b594e
commit
1910800f93
@@ -1366,11 +1366,9 @@ errors signaled by ERROR-FORM or by BODY).
|
|||||||
(kill-buffer buffer)
|
(kill-buffer buffer)
|
||||||
(goto-char (point-min))))))
|
(goto-char (point-min))))))
|
||||||
(package--unless-error body
|
(package--unless-error body
|
||||||
(let ((url (expand-file-name file url)))
|
(unless (file-name-absolute-p url)
|
||||||
(unless (file-name-absolute-p url)
|
(error "Location %s is not a url nor an absolute file name" url))
|
||||||
(error "Location %s is not a url nor an absolute file name"
|
(insert-file-contents-literally (expand-file-name file url)))))
|
||||||
url))
|
|
||||||
(insert-file-contents-literally url)))))
|
|
||||||
|
|
||||||
(define-error 'bad-signature "Failed to verify signature")
|
(define-error 'bad-signature "Failed to verify signature")
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user