Index: openacs-4/packages/general-comments/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/admin/index.tcl,v
diff -u -r1.8.2.2 -r1.8.2.3
--- openacs-4/packages/general-comments/www/admin/index.tcl	6 Sep 2022 09:44:03 -0000	1.8.2.2
+++ openacs-4/packages/general-comments/www/admin/index.tcl	21 Mar 2023 15:10:36 -0000	1.8.2.3
@@ -114,7 +114,7 @@
 }] {
     set author [person::name -person_id $creation_user]
     set live_version_p [expr {$live_version_p ? $yes : $no}]
-    set approved_p [expr {$approved_p ? $yes : $no}]
+    set approved_p [expr {[string is true -strict $approved_p] ? $yes : $no}]
     set pretty_date [lc_time_fmt $creation_date "%x %X"]
 }