Index: openacs-4/packages/general-comments/www/admin/toggle-approval.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/admin/toggle-approval.tcl,v
diff -u -r1.2 -r1.2.26.1
--- openacs-4/packages/general-comments/www/admin/toggle-approval.tcl	14 Jun 2001 19:52:22 -0000	1.2
+++ openacs-4/packages/general-comments/www/admin/toggle-approval.tcl	3 Oct 2013 08:41:29 -0000	1.2.26.1
@@ -22,7 +22,7 @@
 # if the user did not pass in a revision_id, then
 # assume that the user wishes to toggle the approval
 # state of the latest revision
-if { [empty_string_p $revision_id] } {
+if { $revision_id eq "" } {
     set revision_id [db_string get_latest_revision \
         "select content_item.get_latest_revision(:comment_id) from dual"]
 }