v0.15.0: Critical input/rendering fixes, subagent-reviewed #7
11
demo.lisp
11
demo.lisp
@@ -6,8 +6,17 @@
|
|||||||
;;; text-input, textarea, select, dialog, scrollbox, tabbar.
|
;;; text-input, textarea, select, dialog, scrollbox, tabbar.
|
||||||
|
|
||||||
(load "~/quicklisp/setup.lisp")
|
(load "~/quicklisp/setup.lisp")
|
||||||
|
|
||||||
|
;; Register local project in case it's not symlinked into quicklisp/local-projects/
|
||||||
|
(let ((cl-tty-path (truename ".")))
|
||||||
|
(pushnew cl-tty-path ql:*local-project-directories* :test #'equal))
|
||||||
(ql:register-local-projects)
|
(ql:register-local-projects)
|
||||||
(ql:quickload :cl-tty :silent t)
|
|
||||||
|
(ignore-errors (ql:quickload :cl-tty :silent t))
|
||||||
|
;; Fallback: load via asdf directly if quicklisp didn't find it
|
||||||
|
(unless (find-package :cl-tty.backend)
|
||||||
|
(load "cl-tty.asd")
|
||||||
|
(asdf:load-system :cl-tty))
|
||||||
|
|
||||||
(use-package :cl-tty.backend)
|
(use-package :cl-tty.backend)
|
||||||
(use-package :cl-tty.input)
|
(use-package :cl-tty.input)
|
||||||
|
|||||||
1
system-index.txt
Normal file
1
system-index.txt
Normal file
@@ -0,0 +1 @@
|
|||||||
|
cl-tty.asd
|
||||||
Reference in New Issue
Block a user