# HG changeset patch
# User Reiner Steib <Reiner.Steib@gmx.de>
# Date 1157973354 0
# Node ID e5e7b6d129dd785fb05f7b34fd5ea54d52e1c389
# Parent  939f0ad90003bbebe0a11fe71ca117015800b49d
(pushnew): Add missing `,'.

diff -r 939f0ad90003 -r e5e7b6d129dd lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Sep 11 09:47:43 2006 +0000
+++ b/lisp/ChangeLog	Mon Sep 11 11:15:54 2006 +0000
@@ -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)
diff -r 939f0ad90003 -r e5e7b6d129dd lisp/emacs-lisp/cl.el
--- a/lisp/emacs-lisp/cl.el	Mon Sep 11 09:47:43 2006 +0000
+++ b/lisp/emacs-lisp/cl.el	Mon Sep 11 11:15:54 2006 +0000
@@ -160,7 +160,7 @@
   (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)))