Mercurial > emacs
changeset 45821:41129d3d126b
(copy-tree): Use `nconc' and `nreverse' instead of `nreconc'.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Fri, 14 Jun 2002 05:48:51 +0000 |
| parents | 460253ac1ce0 |
| children | 5d2e84e46c56 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Thu Jun 13 22:27:37 2002 +0000 +++ b/lisp/subr.el Fri Jun 14 05:48:51 2002 +0000 @@ -204,7 +204,7 @@ (setq newcar (copy-tree (car tree) vecp))) (push newcar result)) (setq tree (cdr tree))) - (nreconc result tree)) + (nconc (nreverse result) tree)) (if (and vecp (vectorp tree)) (let ((i (length (setq tree (copy-sequence tree))))) (while (>= (setq i (1- i)) 0)