adds font-css and correct tutorial 28

source/clog.lisp

@@ -351,6 +351,7 @@ embedded in a native template application.)"
   (font-variant-type          type)
   (system-font-type           type)
   (font                       generic-function)
+  (font-css                   generic-function)
   (set-font                   generic-function)
   (text-alignment-type        type)
   (text-alignment             generic-function)

tutorial/28-tutorial/hello-builder/hello-builder.asd

@@ -8,5 +8,11 @@
   :version "0.0.0"
   :serial t
   :depends-on (#:clog)
+  :entry-point "hello-builder:start-app"
   :components ((:file "hello-builder")
                (:file "hello")))
+
+(asdf:defsystem #:hello-builder/tools
+  :defsystem-depends-on (:clog)
+  :depends-on (#:hello-builder #:clog/tools) ; add clog plugins here as #:plugin/tools for design time
+  :components ((:clog-file "hello")))

tutorial/28-tutorial/hello-builder/hello-builder.lisp

@@ -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 ()