r9537:

diff --git a/classes.lisp b/classes.lisp
index 8cb5e5d65f637900d8b2489a57d7482e3928e688..24ba9d1e0ba3c23d9d96fe5ede97878d366872f1 100644 (file)
--- a/classes.lisp
+++ b/classes.lisp
@@ -196,7 +196,7 @@
    (coa :value-type cdata :initarg :coa :reader coa))
   (:metaclass hyperobject-class)
   (:user-name "Co-occuring Concept")
-  (:default-print-slots soc cot cof coa cui2 pfstr2))
+  (:default-print-slots cot cof coa cui2 pfstr2))
 
        
 (defclass ucon (umlsclass)