cl-tui.asd

@@ -2,7 +2,7 @@
 (asdf:defsystem :cl-tui
   :description "Reusable Common Lisp Terminal UI Framework"
   :author "Amr Gharbeia"
-  :version "0.2.0"
+  :version "0.3.0"
   :license "TBD"
   :depends-on (:fiveam)
   :components

src/components/dirty-tests.lisp

@@ -1,5 +1,6 @@
 ;; Dirty tracking tests are in box-tests.lisp (same test suite)
 (in-package :cl-tui-box-test)
+(in-suite box-suite)
 
 (test dirty-mixin-default-is-dirty
   "A dirty-mixin starts as dirty"

src/components/render-tests.lisp

@@ -1,4 +1,5 @@
 (in-package :cl-tui-box-test)
+(in-suite box-suite)
 
 (defun make-capturing-backend ()
   (let* ((s (make-string-output-stream))

src/components/render.lisp

@@ -9,8 +9,7 @@
 
 (defgeneric component-children (component)
   (:documentation "Return the children of COMPONENT, or nil.")
-  (:method ((bx box)) nil)
-  (:method ((tx text)) nil))
+  (:method ((c t)) nil))
 
 (defgeneric component-parent (component)
   (:documentation "Return the parent of COMPONENT, or nil.")