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

Add instructions to tutorial 18

Browse source
This commit is contained in:
David Botton 2021-01-31 20:20:29 -05:00
parent 2fb32556e1
commit cdf83a3630
2 changed files with 8 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
clog.asd
View file

@ -5,12 +5,11 @@
:author "David Botton <david@botton.com>"
:license "BSD"
:version "0.8.0"
:version "0.9.0"
:serial t
:depends-on (#:clack #:websocket-driver #:alexandria #:hunchentoot #:cl-ppcre
#:bordeaux-threads #:trivial-open-browser
#:lack-middleware-static #:lack-middleware-session
#:mgl-pax #:quri)
#:lack-middleware-static #:mgl-pax #:quri)
:components ((:file "clog-connection")
(:file "clog")
(:file "clog-docs")

7
tutorial/18-tutorial.lisp
View file

@ -7,7 +7,12 @@
(defun on-new-window (body)
(let* ((target1 (create-div body))
(target2 (create-div body))
(object (create-div target1)))
(object (create-div target1))
(msg (create-div body
:content "Drag green box to other yellow box")))
(setf (positioning msg) :fixed)
(setf (top msg) "125px")
(setf (positioning target1) :fixed)
(setf (top target1) "10px")