Drop usage of defaction

[clinton/lisp-on-lines.git] / src / attributes / dojo-attributes.lisp

diff --git a/src/attributes/dojo-attributes.lisp b/src/attributes/dojo-attributes.lisp
index 8cb5447..39f3acc 100644 (file)
--- a/src/attributes/dojo-attributes.lisp
+++ b/src/attributes/dojo-attributes.lisp
@@ -2,7 +2,7 @@
 
 (deflayer dojo)
 
 
 (deflayer dojo)
 

-(define-layered-class
+#+nil(define-layered-class

     description :in-layer dojo ()
   ((dojo-type :accessor dojo-type :initarg :dojo-type :initform nil :special t)))
 
     description :in-layer dojo ()
   ((dojo-type :accessor dojo-type :initarg :dojo-type :initform nil :special t)))