From fccdc92d4be229ed88c3db366cf9e44a0664abaa Mon Sep 17 00:00:00 2001
From: gerd <gerd>
Date: Thu, 3 Apr 2003 11:40:06 +0000
Subject: [PATCH] 	* pcl/pclload.lisp ("PCL"): Remove references to the 
 slot-accessor-name package.

---
 pcl/pclload.lisp | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/pcl/pclload.lisp b/pcl/pclload.lisp
index a4d434397..5cfe91c0a 100644
--- a/pcl/pclload.lisp
+++ b/pcl/pclload.lisp
@@ -1,12 +1,8 @@
 (in-package "PCL")
-(unless (find-package "SLOT-ACCESSOR-NAME")
-  (make-package "SLOT-ACCESSOR-NAME" :use nil))
 (rename-package "PCL" "PCL" '("OLD-PCL"))
-(rename-package "SLOT-ACCESSOR-NAME" "SLOT-ACCESSOR-NAME"
-		'("OLD-SLOT-ACCESSOR-NAME"))
 (import 'kernel:funcallable-instance-p)
 (load "target:pcl/defsys")
 (load-pcl)
 (rename-package "PCL" "PCL" '())
-(rename-package "SLOT-ACCESSOR-NAME" "SLOT-ACCESSOR-NAME" '())
+
 
-- 
GitLab