Use Quelpa file fetcher instead of url

An upstream issue with Emacs causes local file urls to incorrectly be
interpreted as FTP addresses on Windows, see #6602.
This commit is contained in:
NJBS 2016-07-17 01:58:30 -04:00
parent c64d04f944
commit 37ce95b362
1 changed files with 6 additions and 5 deletions

View File

@ -498,11 +498,12 @@ If TOGGLEP is nil then `:toggle' parameter is ignored."
(eq (plist-get (cdr location) :fetcher) 'local))
(setq location
`(recipe
:fetcher url
:url ,(format
"file://%s%s/%s.el"
(configuration-layer/get-layer-local-dir (oref layer :name))
name-str name-str))))
:fetcher file
:path ,(expand-file-name
(format
"%s%s/%s.el"
(configuration-layer/get-layer-local-dir (oref layer :name))
name-str name-str)))))
(when location (oset obj :location location))
(when min-version (oset obj :min-version (version-to-list min-version)))
(when step (oset obj :step step))