mirror of
https://github.com/dimitri/el-get.git
synced 2024-09-29 13:08:51 +08:00
Make http retrieval synchronous when it needs to be
This commit is contained in:
parent
2f53408bf9
commit
43a12a5dc7
10
el-get.el
10
el-get.el
|
@ -1125,8 +1125,14 @@ into the package :localname option or its `file-name-nondirectory' part."
|
|||
(concat (file-name-as-directory pdir) fname))))
|
||||
(unless (file-directory-p pdir)
|
||||
(make-directory pdir))
|
||||
(url-retrieve
|
||||
url 'el-get-http-retrieve-callback `(,package ,post-install-fun ,dest ,el-get-sources))))
|
||||
|
||||
(if (not el-get-default-process-sync)
|
||||
(url-retrieve url 'el-get-http-retrieve-callback
|
||||
`(,package ,post-install-fun ,dest ,el-get-sources))
|
||||
|
||||
(with-current-buffer (url-retrieve-synchronously url)
|
||||
(el-get-http-retrieve-callback nil package post-install-fun dest el-get-sources)))))
|
||||
|
||||
|
||||
|
||||
;;
|
||||
|
|
Loading…
Reference in New Issue
Block a user