Restore :ignore property in package! macro
This commit is contained in:
parent
9dc4e59a2c
commit
dd24578657
1 changed files with 4 additions and 3 deletions
|
@ -543,9 +543,10 @@ Accepts the following properties:
|
||||||
(plist-put plist :recipe (cons name pkg-recipe)))
|
(plist-put plist :recipe (cons name pkg-recipe)))
|
||||||
(when pkg-pin
|
(when pkg-pin
|
||||||
(plist-put plist :pin nil)))
|
(plist-put plist :pin nil)))
|
||||||
(let ((val (plist-get plist :freeze)))
|
(dolist (prop '(:ignore :freeze))
|
||||||
(when val
|
(let ((val (plist-get plist prop)))
|
||||||
(plist-put plist :freeze (eval val))))
|
(when val
|
||||||
|
(plist-put plist prop (eval val)))))
|
||||||
`(progn
|
`(progn
|
||||||
,(when (and pkg-pin t)
|
,(when (and pkg-pin t)
|
||||||
`(map-put package-pinned-packages ',name ,pkg-pin))
|
`(map-put package-pinned-packages ',name ,pkg-pin))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue