(pushnew): Add missing `,'.

This commit is contained in:
Reiner Steib 2006-09-11 11:15:54 +00:00
parent bcd8e1a907
commit e027c6e48d
2 changed files with 5 additions and 1 deletions

View file

@ -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)

View file

@ -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)))