From 1f3ca8d587cc0111799ae498306db4577e350003 Mon Sep 17 00:00:00 2001 From: David Botton Date: Sun, 13 Feb 2022 08:39:45 -0500 Subject: [PATCH] Add new title text --- demos/04-demo.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/demos/04-demo.lisp b/demos/04-demo.lisp index a9e5f7e..2e3eb12 100644 --- a/demos/04-demo.lisp +++ b/demos/04-demo.lisp @@ -59,7 +59,7 @@ (defun new-content (app) (setf (inner-html (main app)) "") - (let ((new-page (create-form-element (main app) :text)) + (let ((new-page (create-form-element (main app) :text :value "New Title")) (tmp (create-br (main app))) (text-area (create-text-area (main app) :rows 10 :columns 40))) (declare (ignore tmp))