Index: openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl,v
diff -u -r1.20.2.4 -r1.20.2.5
--- openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl	3 Jul 2020 07:43:20 -0000	1.20.2.4
+++ openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl	1 Sep 2020 17:41:50 -0000	1.20.2.5
@@ -18,10 +18,12 @@
 
 } {
     set dynamic_p [db_string attribute_for_dynamic_object_p {
-        select exists (select 1 from acs_attributes a, acs_object_types t
-                        where t.dynamic_p = 't'
-                          and a.object_type = t.object_type
-                          and a.attribute_id = :value)
+        select case when exists
+        (select 1 from acs_attributes a, acs_object_types t
+         where t.dynamic_p = 't'
+         and a.object_type = t.object_type
+         and a.attribute_id = :value)
+        then 1 else 0 end
         from dual
     }]
     if {!$dynamic_p} {