Index: openacs.org-dev/packages/forums/www/forum-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/forums/www/forum-view.tcl,v
diff -u -r1.8 -r1.9
--- openacs.org-dev/packages/forums/www/forum-view.tcl	18 Nov 2002 17:00:21 -0000	1.8
+++ openacs.org-dev/packages/forums/www/forum-view.tcl	26 Jan 2003 13:35:35 -0000	1.9
@@ -27,7 +27,7 @@
 if {!${admin_p}} {
     set moderate_p [forum::security::can_moderate_forum_p -forum_id $forum_id]
     if {!${moderate_p}} {
-        set post_p [forum::security::can_post_forum_p -forum_id $forum_id]
+        set post_p [expr { [ad_conn user_id] == 0 || [forum::security::can_post_forum_p -forum_id $forum_id] }]
     } else {
         set post_p 1
     }