diff options
| author | Robert Pluim <rpluim@gmail.com> | 2022-03-01 11:34:11 +0100 |
|---|---|---|
| committer | Robert Pluim <rpluim@gmail.com> | 2022-07-25 15:35:30 +0200 |
| commit | b86569f1302a48d4c402d0cffad75679989f2236 (patch) | |
| tree | 6cecf8fbc537966df99a741a11de0135e3f313b6 /lisp/emacs-lisp | |
| parent | ffe12ff2503917e47c0356195b31430996c148f9 (diff) | |
| download | emacs-b86569f1302a48d4c402d0cffad75679989f2236.tar.gz emacs-b86569f1302a48d4c402d0cffad75679989f2236.tar.bz2 emacs-b86569f1302a48d4c402d0cffad75679989f2236.zip | |
Make package-archives URL treatment slighty laxer
'package-archives' URLs are expected to end in '/', but we can
cater for people typoing that by using 'url-expand-file-name'.
* lisp/emacs-lisp/package.el (package--with-response-buffer-1): Use
'url-expand-file-name' instead of 'concat'.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 5ea0c819e93..b25865f429f 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1325,7 +1325,7 @@ errors signaled by ERROR-FORM or by BODY). (cl-defun package--with-response-buffer-1 (url body &key async file error-function noerror &allow-other-keys) (if (string-match-p "\\`https?:" url) - (let ((url (concat url file))) + (let ((url (url-expand-file-name file url))) (if async (package--unless-error #'ignore (url-retrieve |