From a7bd5e5ed27854e17c3b935b72df1ccbe13c5fde Mon Sep 17 00:00:00 2001
From: David Botton <david@botton.com>
Date: Tue, 19 Jul 2022 23:23:01 -0400
Subject: [PATCH] fix encoding of html entities

---
 tools/clog-builder-settings.lisp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/tools/clog-builder-settings.lisp b/tools/clog-builder-settings.lisp
index 310b74d..d0958ee 100644
--- a/tools/clog-builder-settings.lisp
+++ b/tools/clog-builder-settings.lisp
@@ -325,7 +325,6 @@
   `((:name "contents"
      :setup ,(lambda (control td1 td2)
                (declare (ignore td1))
-               (princ (inner-html control))
                (let ((d1 (create-text-area td2 :value (inner-html control))))
                  (set-on-change d1 (lambda (obj)
                                      (declare (ignore obj))