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 -N -r1.9 -r1.10 --- openacs-4/packages/forums/lib/message/row.tcl 20 Sep 2008 12:10:28 -0000 1.9 +++ openacs-4/packages/forums/lib/message/row.tcl 23 Oct 2008 12:09:02 -0000 1.10 @@ -49,3 +49,7 @@ set allow_edit_own_p [parameter::get -parameter AllowUsersToEditOwnPostsP -default 0] set own_p [expr {$message(user_id) eq $viewer_id && $allow_edit_own_p}] + +set notflat_p [expr {$presentation_type ne "flat"}] +set post_and_notflat_p [expr {$permissions(post_p) && $notflat_p}] +set any_action_p [expr { $post_and_notflat_p || $viewer_id || $moderate_p }]