From 0b7edf57e8a98e77c5d3e02aee02ddc083521466 Mon Sep 17 00:00:00 2001
From: Rob Browning <rlb@defaultvalue.org>
Date: Sat, 28 Apr 2001 17:17:38 +0000
Subject: [PATCH] 	* goops/save.scm (write-readably): rename list* to
 cons*.

---
 oop/goops/save.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/oop/goops/save.scm b/oop/goops/save.scm
index fa13778bd..10d193055 100644
--- a/oop/goops/save.scm
+++ b/oop/goops/save.scm
@@ -307,7 +307,7 @@
     (display (cond ((not not-literal?) #\()
 		   (proper? "(list ")
 		   (1? "(cons ")
-		   (else "(list* "))
+		   (else "(cons* "))
 	     file)
     (if (and not-literal?
 	     (literal? (car o) env))
-- 
2.20.1