mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

default form values

Browse source
This commit is contained in:
David Botton 2021-02-25 12:24:59 -05:00
parent 9fe95bbc5e
commit 17c28e43c2
2 changed files with 14 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tutorial/22-tutorial.lisp
View file

@ -75,12 +75,12 @@
(defun on-dlg-form (obj)
(form-dialog obj "Please enter your information."
'(("Title" "title" :select (("Mr." "mr")
("Mrs." "mrs")
("Mrs." "mrs" :selected)
("Ms." "ms")
("Other" "other")))
("Eye Color" "color" :radio (("Blue" "blue")
("Brown" "brown")
("Green" "green")
("Green" "green" :checked)
("Other" "other")))
("Send Mail" "send-mail" :checkbox t)
("Name" "name" :text "Real Name")