mirror of
https://github.com/rabbibotton/clog.git
synced 2025-12-06 02:30:42 -08:00
Add title
This commit is contained in:
parent
d78aa662af
commit
6222e60482
1 changed files with 1 additions and 0 deletions
|
|
@ -29,6 +29,7 @@
|
||||||
;; clog-gui can be mixed in to non-desktop environments, but
|
;; clog-gui can be mixed in to non-desktop environments, but
|
||||||
;; to use you must call first clog-gui-initialize
|
;; to use you must call first clog-gui-initialize
|
||||||
(clog-gui-initialize body)
|
(clog-gui-initialize body)
|
||||||
|
(setf (title (html-document body)) "Tutorial 23")
|
||||||
(set-on-click (create-button body :content
|
(set-on-click (create-button body :content
|
||||||
"Click for my question. You have 10 seconds to answer.")
|
"Click for my question. You have 10 seconds to answer.")
|
||||||
(lambda (obj)
|
(lambda (obj)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue