fix for issue #314

rabbibotton · Jan 14, 2024 · f5420f9 · f5420f9
1 parent d8d2fd8
commit f5420f9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/source/clog-dbi.lisp b/source/clog-dbi.lisp
@@ -427,7 +427,7 @@ the displayed option."
           (funcall (on-row obj) obj tr))
         (loop for (key value) on row by #'cddr while value
               do
-                 (let ((td (create-table-column obj :content value)))
+                 (let ((td (create-table-column tr :content value)))
                    (when (on-column obj)
                      (funcall (on-column obj) obj key td)))))))
   (when (on-footer obj)