Index: openacs-4/packages/forums/lib/message/delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/delete.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/lib/message/delete.tcl	7 Apr 2018 19:07:31 -0000	1.6
+++ openacs-4/packages/forums/lib/message/delete.tcl	3 Sep 2024 15:37:38 -0000	1.7
@@ -6,7 +6,7 @@
     @creation-date 2002-05-24
     @cvs-id $Id$
 
-} 
+}
 
 set table_border_color [parameter::get -parameter table_border_color]
 
@@ -24,7 +24,9 @@
 
 set message(tree_level) 0
 
-set confirm_url [export_vars -base "message-delete" {message_id return_url {confirm_p 1}}]
+set confirm_url [export_vars -base "message-delete" {
+    {message_id:sign(csrf) $message(message_id)} return_url {confirm_p 1}
+}]
 
 if {[info exists alt_template] && $alt_template ne ""} {
   ad_return_template $alt_template