Support no-quicklisp asdf systems and OCICL

This commit is contained in:
David Botton 2024-07-08 14:47:30 -04:00
parent eda76103cb
commit e189b51c87
9 changed files with 196 additions and 33 deletions

View file

@ -1,10 +1,12 @@
(defpackage #:<%= (@ sys-name) %>
(:use #:cl #:clog)
(:use #:cl #:clog #:clog-gui)
(:export start-app))
(in-package :<%= (@ sys-name) %>)
(defun on-new-window (body)
;; To enable use of builder panels
;; (clog-gui-initialize body)
;; Use the panel-box-layout to center horizontally
;; and vertically our div on the screen.
(let* ((layout (create-panel-box-layout body)))