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 -r1.10 -r1.11
--- openacs-4/packages/forums/www/moderate/message-delete.tcl	17 Dec 2003 15:45:31 -0000	1.10
+++ openacs-4/packages/forums/www/moderate/message-delete.tcl	7 Oct 2007 22:37:01 -0000	1.11
@@ -18,4 +18,43 @@
 # Select the stuff
 forum::message::get -message_id $message_id -array message
 
+set dynamic_script "
+  <!--
+  collapse_symbol = '<img src=\"/resources/forums/Collapse16.gif\" width=\"16\" height=\"16\" ALT=\"collapse message\" border=\"0\" title=\"collapse message\">';
+  expand_symbol = '<img src=\"/resources/forums/Expand16.gif\" width=\"16\" height=\"16\" ALT=\"expand message\" border=\"0\" title=\"expand message\">';
+  loading_symbol = '<img src=\"/resources/forums/dyn_wait.gif\" width=\"12\" height=\"16\" ALT=\"x\" border=\"0\">';
+  loading_message = '<i>Loading...</i>';
+  rootdir = 'messages-get';
+  sid = '$message(root_message_id)';
+  //-->
+"
+# stylesheets
+if {![template::multirow exists link]} {
+    template::multirow create link rel type href title lang media
+}
+
+template::multirow append link \
+    stylesheet \
+    text/css \
+    /resources/forums/forums.css \
+    "" \
+    [ad_conn language] \
+    all
+
+# js scripts
+if {![template::multirow exists script]} {
+    template::multirow create script type src charset defer content
+}
+
+template::multirow append script \
+    "text/javascript" \
+    "/resources/forums/forums.js"
+
+template::multirow append script \
+    "text/javascript" \
+    "" \
+    "" \
+    "" \
+    $dynamic_script
+
 ad_return_template