diff --git a/tools/pclcom.lisp b/tools/pclcom.lisp index 47ec7fad62b091be20f439e0634ea9a267f543cf..4fc2a5189cd50786da8eeb444dab27525c7dbcf9 100644 --- a/tools/pclcom.lisp +++ b/tools/pclcom.lisp @@ -3,7 +3,7 @@ ;;; ********************************************************************** ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/pclcom.lisp,v 1.25 2003/03/30 18:43:59 gerd Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/pclcom.lisp,v 1.26 2003/04/06 09:39:24 gerd Exp $") ;;; ;;; ********************************************************************** ;;; @@ -71,9 +71,6 @@ (import slot-unbound "PCL") (kernel:%set-symbol-package slot-unbound (find-package "PCL")))) -(when (find-package "SLOT-ACCESSOR-NAME") - (rename-package "SLOT-ACCESSOR-NAME" "OLD-SLOT-ACCESSOR-NAME")) - (when (find-package "CLOS-MOP") (rename-package "CLOS-MOP" "OLD-CLOS-MOP"))