From 1be152fc1a745e453209820f53cdcc3cce97d934 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 29 Aug 1999 20:27:40 +0000 Subject: [PATCH] Fix previous change. --- lisp/subr.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/subr.el b/lisp/subr.el index a80383467d3..5d94a2aa9ad 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -51,12 +51,12 @@ BODY should be a list of lisp expressions." ;; depend on backquote.el. (list 'function (cons 'lambda cdr))) -(defmacro push (value listname) - "Add VALUE to the list which is the value of LISTNAME. -This is equivalent to (setq LISTNAME (cons VALUE LISTNAME)). +(defmacro push (newelt listname) + "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 value list))) + (list 'cons newelt list))) (defmacro pop (listname) "Return the first element of LISTNAME's value, and remove it from the list. -- 2.39.5