fix: package!: unpinning with :pin nil
This commit is contained in:
parent
b9e460bc64
commit
fac979c6d8
1 changed files with 1 additions and 1 deletions
|
@ -568,7 +568,7 @@ elsewhere."
|
|||
nil))))
|
||||
;; Merge given plist with pre-existing one
|
||||
(cl-loop for (key value) on (list ,@plist) by 'cddr
|
||||
when value
|
||||
when (or (eq key :pin) value)
|
||||
do (cl-callf plist-put plist key value))
|
||||
;; Some basic key validation; throws an error on invalid properties
|
||||
(condition-case e
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue