Index: openacs-4/packages/forums/lib/message/row.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/row.tcl,v diff -u -r1.16 -r1.16.2.1 --- openacs-4/packages/forums/lib/message/row.tcl 25 Jun 2018 09:15:00 -0000 1.16 +++ openacs-4/packages/forums/lib/message/row.tcl 14 Feb 2019 15:00:15 -0000 1.16.2.1 @@ -59,6 +59,10 @@ set notflat_p [expr {$presentation_type ne "flat"}] set post_and_notflat_p [expr {$post_p && $notflat_p}] set any_action_p [expr {$post_and_notflat_p || $viewer_id || $moderate_p}] + + set delete_url [export_vars -base "moderate/message-delete" { + {message_id:sign(max_age=60) $message(message_id)} + }] } template::add_body_script -script [subst {