Index: openacs-4/packages/forums/www/message-view.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-view.adp,v
diff -u -N -r1.12 -r1.13
--- openacs-4/packages/forums/www/message-view.adp	10 Jan 2003 14:12:03 -0000	1.12
+++ openacs-4/packages/forums/www/message-view.adp	16 Jan 2003 13:49:30 -0000	1.13
@@ -36,8 +36,8 @@
 
     <multiple name="responses">
     
-    <% set width [expr 100 - $responses(tree_level)] %>
-  
+    <% set width [expr 100 - [expr $responses(tree_level) - 1] * 3] %>
+
     <tr style="padding-top: 1em">
       <td>
         <table align="right" bgcolor="@table_border_color@" width="@width@%">