diff options
| -rw-r--r-- | lisp/emacs-lisp/package-vc.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index a405a650175..e7b871e171f 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el | |||
| @@ -118,6 +118,8 @@ the `clone' function." | |||
| 118 | :version "29.1") | 118 | :version "29.1") |
| 119 | 119 | ||
| 120 | (defvar package-vc-selected-packages) ; pacify byte-compiler | 120 | (defvar package-vc-selected-packages) ; pacify byte-compiler |
| 121 | |||
| 122 | ;;;###autoload | ||
| 121 | (defun package-vc-install-selected-packages () | 123 | (defun package-vc-install-selected-packages () |
| 122 | "Ensure packages specified in `package-vc-selected-packages' are installed." | 124 | "Ensure packages specified in `package-vc-selected-packages' are installed." |
| 123 | (interactive) | 125 | (interactive) |
| @@ -161,6 +163,7 @@ function `package-vc-selected-packages' to apply the changes." | |||
| 161 | (:lisp-dir string) | 163 | (:lisp-dir string) |
| 162 | (:main-file string) | 164 | (:main-file string) |
| 163 | (:vc-backend symbol))))) | 165 | (:vc-backend symbol))))) |
| 166 | :initialize #'custom-initialize-default | ||
| 164 | :set (lambda (sym val) | 167 | :set (lambda (sym val) |
| 165 | (custom-set-default sym val) | 168 | (custom-set-default sym val) |
| 166 | (package-vc-install-selected-packages)) | 169 | (package-vc-install-selected-packages)) |