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

typos in comments on on-new-window in tutorial-08

Browse source 
minor misspellings and puntucation
This commit is contained in:
cms 2021-02-04 15:36:00 +00:00
parent 9e327bbb6a
commit f860cee2ba
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tutorial/08-tutorial.lisp
View file

@ -71,7 +71,7 @@
(div2 (create-div div1)) (div2 (create-div div1))
(div3 (create-div div2)) (div3 (create-div div2))
(dir (create-div div1 :content "<b>Click and drag the boxes</b>"))) (dir (create-div div1 :content "<b>Click and drag the boxes</b>")))
;; Abosulute allows fixed positioning relative to parent ;; Absolute allows fixed positioning relative to parent
(setf (positioning dir) :absolute) (setf (positioning dir) :absolute)
(setf (bottom dir) 0) (setf (bottom dir) 0)
;; borders ;; borders
@ -87,11 +87,11 @@
(setf (height div3) 200) (setf (height div3) 200)
;; Fixed positioning allows direct positioning relative ;; Fixed positioning allows direct positioning relative
;; to the entire window. ;; to the entire window.
(setf (positioning div1) :fixed) ; It's location relative to window (setf (positioning div1) :fixed) ; Its location relative to window
(setf (overflow div1) :hidden) ; Clip the contents (setf (overflow div1) :hidden) ; Clip the contents
(set-on-touch-start div1 'on-mouse-down) (set-on-touch-start div1 'on-mouse-down)
(set-on-mouse-down div1 'on-mouse-down) (set-on-mouse-down div1 'on-mouse-down)
(setf (positioning div2) :absolute) ; It's location relative to is parent container (setf (positioning div2) :absolute) ; Its location relative to its parent container
(setf (overflow div2) :hidden) (setf (overflow div2) :hidden)
(set-on-touch-start div2 'on-mouse-down) (set-on-touch-start div2 'on-mouse-down)
(set-on-mouse-down div2 'on-mouse-down) (set-on-mouse-down div2 'on-mouse-down)