Index: openacs-4/packages/general-comments/www/comment-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add.tcl,v
diff -u -r1.5.20.1 -r1.5.20.2
--- openacs-4/packages/general-comments/www/comment-add.tcl	6 Sep 2013 16:01:49 -0000	1.5.20.1
+++ openacs-4/packages/general-comments/www/comment-add.tcl	3 Oct 2013 08:41:29 -0000	1.5.20.2
@@ -33,7 +33,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]
 }