diff --git a/clog-body.lisp b/clog-body.lisp
index a9cc1cc..90243d2 100644
--- a/clog-body.lisp
+++ b/clog-body.lisp
@@ -13,7 +13,7 @@
 ;; Implementation - clog-body
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(defclass clog-body (clog-obj)
+(defclass clog-body (clog-element)
   ((window
     :reader window
     :initarg :window)