Index: openacs-4/packages/forums/www/moderate/thread-move-thread.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/thread-move-thread.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/forums/www/moderate/thread-move-thread.tcl 7 Aug 2017 23:48:12 -0000 1.4 +++ openacs-4/packages/forums/www/moderate/thread-move-thread.tcl 27 Sep 2017 11:07:52 -0000 1.5 @@ -11,13 +11,11 @@ {confirm_p:boolean 0} } -# Check that the user can moderate the forum -forum::security::require_moderate_message -message_id $message_id - # Select the stuff forum::message::get -message_id $message_id -array message -ad_return_template +# Check that the user can moderate the forum +forum::security::require_moderate_forum -forum_id $message(forum_id) # Local variables: # mode: tcl