diff options
| author | Richard M. Stallman <rms@gnu.org> | 1999-08-29 20:27:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1999-08-29 20:27:40 +0000 |
| commit | 1be152fc1a745e453209820f53cdcc3cce97d934 (patch) | |
| tree | 2523dd5733f31d54cd98135fe0d2047f2a94622a /lisp | |
| parent | d270117a18a28a1bebdb687fd794b5cc89f1559d (diff) | |
| download | emacs-1be152fc1a745e453209820f53cdcc3cce97d934.tar.gz emacs-1be152fc1a745e453209820f53cdcc3cce97d934.tar.bz2 emacs-1be152fc1a745e453209820f53cdcc3cce97d934.zip | |
Fix previous change.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/subr.el | 8 |
1 files 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. |