From aa3de3d5acf29d128fa5c3493b1e1f70babde4cd Mon Sep 17 00:00:00 2001
From: David Botton <david@botton.com>
Date: Tue, 15 Feb 2022 15:13:56 -0500
Subject: [PATCH] bidirectonal links

---
 tutorial/29-tutorial.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tutorial/29-tutorial.lisp b/tutorial/29-tutorial.lisp
index cf05f7e..7f3f471 100644
--- a/tutorial/29-tutorial.lisp
+++ b/tutorial/29-tutorial.lisp
@@ -26,7 +26,7 @@
     (declare (ignore tmp))
     ;; We set up direct relationships between lisp objects and clog objects
     ;; any change to i1 will change my-slot and any change to my-slot
-    ;; will change i1.
+    ;; will change i1 and transform it with #'string-upcase
     (link-slot-and-form-element lisp-obj my-slot i1
 				:transform-to-element #'string-upcase)
     ;; any change to my-count will change t1