changeset 11137:206af14bcffa

Fix setcdr example.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Mar 1995 22:16:51 +0000
parents 043aedff8710
children 8eed13a00d2b
files lispref/lists.texi
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lispref/lists.texi	Mon Mar 27 21:17:25 1995 +0000
+++ b/lispref/lists.texi	Mon Mar 27 22:16:51 1995 +0000
@@ -1417,8 +1417,7 @@
 
 @smallexample
 @group
-(setcdr (assq 3 needles-per-cluster)
-        '("Martian Vacuum Pine"))
+(setcdr (assq 3 copy) '("Martian Vacuum Pine"))
 (cdr (assq 3 needles-per-cluster))
      @result{} ("Pitch Pine")
 @end group