Index: openacs-4/packages/forums/lib/message/post.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/post.tcl,v
diff -u -N -r1.3 -r1.3.2.1
--- openacs-4/packages/forums/lib/message/post.tcl	17 Dec 2003 16:14:05 -0000	1.3
+++ openacs-4/packages/forums/lib/message/post.tcl	26 Apr 2004 17:53:23 -0000	1.3.2.1
@@ -84,6 +84,8 @@
         anonymous_p \
         attach_p
     
+    if { [empty_string_p $anonymous_p] } { set anonymous_p 0 }
+
     set action [template::form::get_button message]
     set displayed_user_id [ad_decode \
         [expr {$anonymous_allowed_p && $anonymous_p}] \