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

Move demos and tutorials to their own packages

Browse source
This commit is contained in:
David Botton 2021-12-29 13:25:43 -05:00
parent 63586cfb0f
commit 2c7230356e
35 changed files with 75 additions and 83 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tutorial/21-tutorial.lisp
View file

@ -42,11 +42,11 @@ on the drop-root."))
(setf (hiddenp (drop-root new-obj)) t))))
new-obj))
(defpackage #:clog-user
(defpackage #:clog-tut-21
(:use #:cl #:clog)
(:export start-tutorial))
(in-package :clog-user)
(in-package :clog-tut-21)
(defun on-new-window (body)
(let* ((drop-list (clog-drop-list:create-drop-list body :content "Top of tree"))