Index: openacs-4/packages/forums/tcl/forums-security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/forums-security-procs.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/forums/tcl/forums-security-procs.tcl	27 Sep 2017 11:07:52 -0000	1.16
+++ openacs-4/packages/forums/tcl/forums-security-procs.tcl	27 Sep 2017 15:33:43 -0000	1.17
@@ -140,7 +140,7 @@
         {-message_id:required}
     } {
         forum::message::get -message_id $message_id -array message        
-        return [require_moderate_forum_p -forum_id $message(forum_id) -user_id $user_id]
+        return [require_moderate_forum -forum_id $message(forum_id) -user_id $user_id]
     }
 
     # admin == moderate!