branch: externals/leaf
commit b49e68613b8efba89c702141f49ad9b4460a7204
Merge: 69c9b057cd 1b94da0cbb
Author: Naoya Yamashita <[email protected]>
Commit: GitHub <[email protected]>
Merge pull request #552 from uwabami/master
leaf-handler-vc: Add package to package-selected-packages
---
leaf.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/leaf.el b/leaf.el
index b6812fd4d8..0f33aef0d2 100644
--- a/leaf.el
+++ b/leaf.el
@@ -1119,10 +1119,12 @@ SPEC is a list of the form (PKG OPTIONS REVISION)"
(let ((pkg (nth 0 spec))
(opts (nth 1 spec))
(rev (nth 2 spec)))
- `(unless (package-installed-p ',pkg)
- (package-vc-install
- ',(if opts `(,pkg ,@opts) pkg)
- ,rev))))
+ `(progn
+ (leaf-safe-push ',pkg package-selected-packages 'no-dup)
+ (unless (package-installed-p ',pkg)
+ (package-vc-install
+ ',(if opts `(,pkg ,@opts) pkg)
+ ,rev)))))
(defmacro leaf-handler-auth (name sym store)
"Handler auth-* to set SYM of NAME from STORE."
