diff --git a/src/strata/strata.org b/src/strata/strata.org
index 11591c0..f6ac74a 100644
--- a/src/strata/strata.org
+++ b/src/strata/strata.org
@@ -59,6 +59,25 @@
   (document *application-frame*))
 #+END_SRC
 
+** cursor
+#+BEGIN_SRC lisp
+(defclass cursor ()
+  ((blink-interval :initarg :blink-interval
+                   :initform 0.5
+                   :accessor blink-interval
+                   :documentation "Frequency of cursor blink, in seconds. If nil, disable cursor blinking.")
+   (color :initarg :color
+          :accessor color
+          :documentation "Color of cursor.")
+   (filled-p :initarg :filled-p
+             :initform t
+             :accessor filled-p
+             :documentation "Whether cursor rectangle should be filled.")
+   (width :initarg :width
+          :accessor width
+          :documentation "Width of cursor.")))
+#+END_SRC
+
 ** display methods
 #+BEGIN_SRC lisp
 (defmethod display ((section section) pane)