Changeset main,43 for main/form-test.lisp

Timestamp:

11/08/2007 07:13:21 PM (19 years ago)

Author:

David Owen <dsowen@…>

branch-nick:

tui-new

revision id:

dsowen@fugue88.ws-20071108191321-hjhsnqe3pkp72kl8

Message:

Scrolling now works.

File:

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

main/form-test.lisp

@@ -46 +46 @@
         (unwind-protect
              (progn
+               (setf (scroll form) 4)
                (tui-input:read-key w))
           (destroy-form form))))))