Index: openacs-4/packages/forums/www/moderate/message-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-delete.tcl,v
diff -u -N -r1.5 -r1.5.2.1
--- openacs-4/packages/forums/www/moderate/message-delete.tcl	18 Sep 2002 13:02:00 -0000	1.5
+++ openacs-4/packages/forums/www/moderate/message-delete.tcl	28 Nov 2002 15:53:32 -0000	1.5.2.1
@@ -8,7 +8,7 @@
 
 } {
     message_id:integer,notnull
-    {return_url ""}
+    {return_url "../message-view"}
     {confirm_p 0}
 }
 
@@ -19,6 +19,7 @@
 
 # Select the stuff
 forum::message::get -message_id $message_id -array message
+set message(subject) [ad_quotehtml $message(subject)]
 
 # Confirmed?
 if {$confirm_p} {