(pushnew): Add missing `,'.
This commit is contained in:
parent
bcd8e1a907
commit
e027c6e48d
2 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2006-09-11 Reiner Steib <Reiner.Steib@gmx.de>
|
||||
|
||||
* emacs-lisp/cl.el (pushnew): Add missing `,'.
|
||||
|
||||
2006-09-11 David Kastrup <dak@gnu.org>
|
||||
|
||||
* help.el (string-key-binding, describe-key-briefly)
|
||||
|
|
|
@ -160,7 +160,7 @@ an element already on the list.
|
|||
(if (symbolp place)
|
||||
(if (null keys)
|
||||
`(let ((pushnew-internal ,place))
|
||||
(add-to-list 'pushnew-internal x nil 'eql)
|
||||
(add-to-list 'pushnew-internal ,x nil 'eql)
|
||||
(setq ,place pushnew-internal))
|
||||
(list 'setq place (list* 'adjoin x place keys)))
|
||||
(list* 'callf2 'adjoin x place keys)))
|
||||
|
|
Loading…
Add table
Reference in a new issue