awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases 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))