mirror of
https://github.com/rabbibotton/clog.git
synced 2025-12-06 02:30:42 -08:00
fix typo
This commit is contained in:
parent
44f96ffca7
commit
cbd18532cc
2 changed files with 4 additions and 3 deletions
|
|
@ -20,6 +20,7 @@
|
|||
(b2 (create-button body :content "Get (my-slot lisp-obj) Value")))
|
||||
(link-form-element-to-slot i1 lisp-obj my-slot)
|
||||
(link-slot-to-form-element lisp-obj my-slot i1)
|
||||
(setf (my-slot lisp-obj) "First Value")
|
||||
(set-on-click b1
|
||||
(lambda (obj)
|
||||
(setf (my-slot lisp-obj) (value i2))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue