Changeset main,46 for main/widget/textbox-test.lisp

Timestamp:

11/12/2007 07:08:49 PM (19 years ago)

Author:

David Owen <dsowen@…>

branch-nick:

tui

revision id:

dsowen@tux-20071112190849-f4iha3mmvx2nskce

Message:

Textboxes and numberboxes now change colors.

File:

• main/widget/textbox-test.lisp (modified) (1 diff)

main/widget/textbox-test.lisp

@@ -14 +14 @@
   (with-screen (s)
     (let* ((data (make-instance 'data))
-           (tb (create-textbox s 10 10 data 8)))
+           (tb (create-textbox s 10 10 data 8
+                               :active-background '(#\Space 60))))
       (unwind-protect
            (flet ((cb (key)