Index: openacs-4/packages/general-comments/www/comment-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-2.tcl,v
diff -u -N -r1.6.20.1 -r1.6.20.2
--- openacs-4/packages/general-comments/www/comment-add-2.tcl	6 Sep 2013 16:01:49 -0000	1.6.20.1
+++ openacs-4/packages/general-comments/www/comment-add-2.tcl	3 Oct 2013 08:41:28 -0000	1.6.20.2
@@ -35,7 +35,7 @@
 # ad_page_contract does not set object_name to
 # [acs_object_name $object_id] if object_name is passed
 # in as an empty string.
-if { [empty_string_p $object_name] } {
+if { $object_name eq "" } {
     set object_name [acs_object_name $object_id]
 }