From f7aaa3b3000f02be969c498c0b429414e7d245b4 Mon Sep 17 00:00:00 2001
From: Marius Vollmer <mvo@zagadka.de>
Date: Tue, 18 Jan 2005 15:00:44 +0000
Subject: [PATCH] (class-of): Changed from being re-exported to just being
 exported.

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

diff --git a/oop/goops.scm b/oop/goops.scm
index 6c11acab6..2b22be241 100644
--- a/oop/goops.scm
+++ b/oop/goops.scm
@@ -30,7 +30,7 @@
 		  define-generic define-accessor define-method
 		  define-extended-generic define-extended-generics
 		  method)
-  :export (goops-version is-a?
+  :export (goops-version is-a? class-of
            ensure-metaclass ensure-metaclass-with-supers
 	   make-class
 	   make-generic ensure-generic
@@ -77,7 +77,6 @@
 	   method-procedure accessor-method-slot-definition
 	   slot-exists? make find-method get-keyword)
   :replace (<class> <operator-class> <entity-class> <entity>)
-  :re-export (class-of)  ;; from (guile)
   :no-backtrace)
 
 ;; First initialize the builtin part of GOOPS