emacs/gnu.emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2026-09-10 07:46:51 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

Load all dependencies when isolating a package

Browse source 
* lisp/emacs-lisp/package.el (package-isolate): Replace call to
'package-compute-transaction', which omits already inferred
dependencies, with a manual dependency resolution.
This commit is contained in:
Philip Kaludercic 2026-08-09 10:11:52 +02:00
parent 293eaf323a
commit effafd92e0
No known key found for this signature in database
1 changed files with 16 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
lisp/emacs-lisp/package.el
View file

@ -2652,8 +2652,22 @@ intended for testing Emacs and/or the packages in a clean environment."
current-prefix-arg)))
(let* ((name (concat "package-isolate-"
(mapconcat #'package-desc-full-name packages ",")))
(dependencies (apply #'append (mapcar #'package-desc-reqs packages)))
(all-packages (package-compute-transaction packages dependencies))
(all-packages
(delete-dups
(nconc
(mapcan
(pcase-lambda (`(,name ,vers))
(and (not (eq name 'emacs))
(not (cl-find name packages :key #'package-desc-name))
(if-let* ((desc (package-get-descriptor
name t
(lambda (desc)
(version-list-<= vers (package-desc-version desc))))))
(list desc)
(error "Failed to find package: (%s %S)" name vers))))
(package--dependencies packages))
packages)))
(all-packages (seq-remove #'package-built-in-p all-packages))
(package-alist (copy-tree package-alist t))
(temp-install-dir nil) initial-scratch-message load-list)
(when-let* ((missing (seq-remove #'package-installed-p all-packages))