Index: openacs-4/packages/forums/tcl/messages-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs.tcl,v
diff -u -N -r1.59.2.12 -r1.59.2.13
--- openacs-4/packages/forums/tcl/messages-procs.tcl	7 Jan 2020 13:26:01 -0000	1.59.2.12
+++ openacs-4/packages/forums/tcl/messages-procs.tcl	7 Jan 2020 13:28:23 -0000	1.59.2.13
@@ -303,7 +303,7 @@
 } {
     Reject a message.
 } {
-    set_state -message_id $message_id -state rejected
+    forum::message::set_state -message_id $message_id -state rejected
 }
 
 ad_proc -public forum::message::approve {