adds font-css and correct tutorial 28

This commit is contained in:
David Botton 2022-12-07 12:49:20 -05:00
parent 9f360254a3
commit f736f6b6e6
3 changed files with 8 additions and 1 deletions

View file

@ -5,7 +5,7 @@
(in-package :hello-builder)
(defun my-click (panel)
(setf (font (hello-span panel)) (format nil "~Apx Times, serif" (random 36)))
(setf (font-css (hello-span panel)) (format nil "~Apx Times, serif" (random 36)))
(setf (color (hello-span panel)) (rgb (random 255) (random 255) (random 255))))
(defun start-app ()