Index: openacs-4/packages/forums/lib/message/row.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/row.adp,v diff -u -r1.21.2.1 -r1.21.2.2 --- openacs-4/packages/forums/lib/message/row.adp 11 Oct 2015 18:13:34 -0000 1.21.2.1 +++ openacs-4/packages/forums/lib/message/row.adp 13 Oct 2015 10:44:52 -0000 1.21.2.2 @@ -40,10 +40,10 @@ - +
    - +
  • #forums.reply#
  • 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.12.2.3 -r1.12.2.4 --- openacs-4/packages/forums/lib/message/row.tcl 11 Oct 2015 18:13:35 -0000 1.12.2.3 +++ openacs-4/packages/forums/lib/message/row.tcl 13 Oct 2015 10:44:53 -0000 1.12.2.4 @@ -12,9 +12,9 @@ {presentation_type:word ""} {forum_moderated_p:boolean 0} {moderate_p:boolean 0} + {post_p:boolean 0} {preview:boolean 0} {alt_template:token ""} - {permissions} {message} } @@ -62,7 +62,7 @@ set any_action_p 0 } else { set notflat_p [expr {$presentation_type ne "flat"}] - set post_and_notflat_p [expr {$permissions(post_p) && $notflat_p}] + set post_and_notflat_p [expr {$post_p && $notflat_p}] set any_action_p [expr { $post_and_notflat_p || $viewer_id || $moderate_p }] } Index: openacs-4/packages/forums/lib/message/thread-chunk.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk.adp,v diff -u -r1.8 -r1.8.2.1 --- openacs-4/packages/forums/lib/message/thread-chunk.adp 14 Jul 2015 22:16:44 -0000 1.8 +++ openacs-4/packages/forums/lib/message/thread-chunk.adp 13 Oct 2015 10:44:53 -0000 1.8.2.1 @@ -3,17 +3,17 @@ rownum=0 forum_moderated_p="@forum_moderated_p;literal@" moderate_p="@permissions.moderate_p;literal@" + post_p="@permissions.post_p;literal@" presentation_type="@forum.presentation_type;literal@" - &permissions="permissions" &message="message"> Index: openacs-4/packages/forums/lib/message/thread-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk.tcl,v diff -u -r1.12.2.1 -r1.12.2.2 --- openacs-4/packages/forums/lib/message/thread-chunk.tcl 12 Sep 2015 11:06:24 -0000 1.12.2.1 +++ openacs-4/packages/forums/lib/message/thread-chunk.tcl 13 Oct 2015 10:44:53 -0000 1.12.2.2 @@ -31,7 +31,7 @@ set query select_message_responses } -# We set a Tcl variable for moderation now (Ben) +# Set the table_name depending on moderation if { $permissions(moderate_p) } { set table_name "forums_messages" } else { Index: openacs-4/packages/forums/www/message-post.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-post.adp,v diff -u -r1.15 -r1.15.2.1 --- openacs-4/packages/forums/www/message-post.adp 3 Jul 2015 10:47:33 -0000 1.15 +++ openacs-4/packages/forums/www/message-post.adp 13 Oct 2015 10:44:53 -0000 1.15.2.1 @@ -7,3 +7,5 @@ &="parent_message" &="anonymous_allowed_p" &="attachments_enabled_p"> + +