mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2026-01-07 17:53:03 -08:00
Code Issues Projects Releases Wiki Activity

add jquery to tut 29

Browse source
This commit is contained in:
David Botton 2022-02-16 23:04:27 -05:00
parent 218fb14a53
commit 4922a69e9e
3 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tutorial/29-tutorial.lisp
View file

@ -1,4 +1,4 @@
;; Demonstrate CLOG presentations
;; Demonstrate CLOG-presentations and CLOG-jQuery
;; links established between CLOG objects and Lisp objects
(defpackage #:clog-tut-29
@ -49,6 +49,8 @@
(lambda (obj)
(declare (ignore obj))
(setf (value i2) (my-slot lisp-obj))))
;; Use jQuery to set all inputs to have a background color
(setf (background-color (create-jquery body "input[type=text]")) :beige)
;; This updates an element on the page by just changing the value of the linked
;; slot and my-count can be adjusted mid loop from web page
(loop