Index: main/form-test.lisp
===================================================================
--- main/form-test.lisp	(revision main,45)
+++ main/form-test.lisp	(revision main,47)
@@ -7,10 +7,14 @@
 
 
-(defform test ((:label 0 0 "Family name:")
-               (:textbox 0 13 family-name 16)
-               (:label 1 0 " Given name:")
-               (:textbox 1 13 given-name 16)
-               (:label 2 0 "        Age:")
-               (:numberbox 2 13 age 2)))
+(defform test (:inactive-widget-background (#\Space 60)
+               :active-widget-background (#\Space 57))
+  (:label 0 0 "Family name:")
+  (:textbox 0 13 family-name 16
+            :inactive-background (#\Space 6)
+            :active-background (#\Space 3))
+  (:label 1 0 " Given name:")
+  (:textbox 1 13 given-name 16)
+  (:label 2 0 "        Age:")
+  (:numberbox 2 13 age 2))
 
 (defclass test ()