emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

:popup: cl-pushnew => push

Browse source
This commit is contained in:
Henrik Lissner 2017-02-13 04:45:22 -05:00
parent 2d0b2d9a3f
commit f4e0734dcf
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
core/core-popups.el
View file

@ -37,7 +37,7 @@
(@def-setting :popup (&rest rules) (@def-setting :popup (&rest rules)
"Prepend a new popup rule to `shackle-rules'." "Prepend a new popup rule to `shackle-rules'."
(if (not (-all-p 'listp rules)) (if (not (-all-p 'listp rules))
`(cl-pushnew ',rules shackle-rules :key 'car :test 'equal) `(push ',rules shackle-rules)
(let (real-rules) (let (real-rules)
(dolist (rule rules) (dolist (rule rules)
(let ((pattern (car rule)) (let ((pattern (car rule))