diff options
| author | Philip Kaludercic | 2026-04-12 13:09:09 +0200 |
|---|---|---|
| committer | Philip Kaludercic | 2026-04-12 13:10:57 +0200 |
| commit | be2b4a983192efc0f5f7ce99a95e3bb648f3984a (patch) | |
| tree | f09dd43f215633684db48a89f0a1fa74971c2f8c | |
| parent | dedd652fc58c2157e0c27df1ca2e5836a94ce641 (diff) | |
| download | emacs-be2b4a983192efc0f5f7ce99a95e3bb648f3984a.tar.gz emacs-be2b4a983192efc0f5f7ce99a95e3bb648f3984a.zip | |
Clean up 'Info-directory-list' after deleting package
* lisp/emacs-lisp/package.el (package--delete-directory): Remove
manual before physically deleting the package. (Bug#80776)
| -rw-r--r-- | lisp/emacs-lisp/package.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 0d21c520609..7d934222b16 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -2348,6 +2348,9 @@ installed), maybe you need to \\[package-refresh-contents]") | |||
| 2348 | "Delete PKG-DESC directory DIR recursively. | 2348 | "Delete PKG-DESC directory DIR recursively. |
| 2349 | Clean-up the corresponding .eln files if Emacs is native | 2349 | Clean-up the corresponding .eln files if Emacs is native |
| 2350 | compiled, and remove the DIR from `load-path'." | 2350 | compiled, and remove the DIR from `load-path'." |
| 2351 | (when (and (file-exists-p (expand-file-name "dir" dir)) | ||
| 2352 | (boundp 'Info-directory-list)) | ||
| 2353 | (cl-callf2 delete dir Info-directory-list)) | ||
| 2351 | (setq load-path (cl-remove-if (lambda (s) (file-in-directory-p s dir)) | 2354 | (setq load-path (cl-remove-if (lambda (s) (file-in-directory-p s dir)) |
| 2352 | load-path)) | 2355 | load-path)) |
| 2353 | (when (featurep 'native-compile) | 2356 | (when (featurep 'native-compile) |