From 187ae5c9c9c1670aa375e09cf7fa601d7085cfa3 Mon Sep 17 00:00:00 2001 From: smvamse <84125167+smvamse@users.noreply.github.com> Date: Sun, 11 Jul 2021 21:12:42 +0530 Subject: [PATCH] typos --- tutorial/04-tutorial.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tutorial/04-tutorial.lisp b/tutorial/04-tutorial.lisp index 47c5a69..25dd602 100644 --- a/tutorial/04-tutorial.lisp +++ b/tutorial/04-tutorial.lisp @@ -5,12 +5,12 @@ (in-package :clog-user) (defun my-on-click (obj) ; obj in any event is the target of the event - (setf (color obj) (rgb 0 255 0))) ; this makes it possible to reuse events + (setf (color obj) (rgb 0 255 0))) ; this makes it possible to reuse event handlers ; RGB is a helper function for color (defun on-new-window (body) "On-new-window handler." (setf (title (html-document body)) "Tutorial 4") - ;; The same handler my-on-click is set no both targets + ;; The same handler #'my-on-click is set on both targets (set-on-click (create-section body :h1 :content "Hello World! (click me!)") #'my-on-click) (set-on-click (create-section body :h3 :content "Click me too!")