fix(elisp): use cl-caddr instead of caddr
Current emacs (25.3 on fedora at least) does not define the alias anymore, replace it with a symbol that is still available on both old and new versions!
This commit is contained in:
parent
edba681cd7
commit
bf98fbd198
1 changed files with 2 additions and 2 deletions
|
|
@ -116,7 +116,7 @@ actions (a key, a function, and a name for each action)."
|
|||
((stringp action-item)
|
||||
(lambda (action)
|
||||
(member action-item
|
||||
(list (car action) (caddr action))))))
|
||||
(list (car action) (cl-caddr action))))))
|
||||
(cdr action-list)))
|
||||
(when index
|
||||
(setq index (1+ index))))
|
||||
|
|
@ -225,7 +225,7 @@ If anything goes wrong, throw an error and do not modify ACTION-VAR."
|
|||
(setq action-list (cl-loop for a in action-list
|
||||
for count from 0
|
||||
if (= count index)
|
||||
collect (list (car a) fun (caddr a))
|
||||
collect (list (car a) fun (cl-caddr a))
|
||||
else
|
||||
collect a))))
|
||||
(`(setname ,action-item ,name)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue