From: Dave Love <fx@gnu.org>
Date: Tue, 31 Aug 1999 13:12:46 +0000 (+0000)
Subject: (push): Fix typo.
X-Git-Tag: emacs-pretest-21.0.90~6972
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=22d85d00b0ad6fd4c54911df91c878715c182407;p=emacs.git

(push): Fix typo.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 5d94a2aa9ad..0d781e0082e 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -55,8 +55,8 @@ BODY should be a list of lisp expressions."
   "Add NEWELT to the list which is the value of LISTNAME.
 This is equivalent to (setq LISTNAME (cons NEWELT LISTNAME)).
 LISTNAME must be a symbol."
-  (list 'setq list
-	(list 'cons newelt list)))
+  (list 'setq listname
+	(list 'cons newelt listname)))
 
 (defmacro pop (listname)
   "Return the first element of LISTNAME's value, and remove it from the list.