Index: openacs-4/packages/forums/lib/message/threads-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/threads-chunk.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/forums/lib/message/threads-chunk.tcl	16 Sep 2008 17:26:15 -0000	1.12
+++ openacs-4/packages/forums/lib/message/threads-chunk.tcl	20 Sep 2008 12:10:28 -0000	1.13
@@ -47,7 +47,7 @@
 # moderated 2. User is a moderator or adminsitrator
 
 if {$permissions(post_p)} {
-  if {([forum::new_questions_allowed_p -forum_id $forum_id] && ($forum(posting_policy) == "open" || $forum(posting_policy) == "moderated")) ||  [template::util::is_true $permissions(admin_p)] ||  [template::util::is_true $permissions(moderate_p)]  } {
+  if {([forum::new_questions_allowed_p -forum_id $forum_id] && ($forum(posting_policy) eq "open" || $forum(posting_policy) eq "moderated")) ||  [template::util::is_true $permissions(admin_p)] ||  [template::util::is_true $permissions(moderate_p)]  } {
     lappend actions [_ forums.Post_a_New_Message] [export_vars -base "${base_url}message-post" { forum_id }] [_ forums.Post_a_New_Message]
   }
 }