Index: openacs-4/packages/forums/tcl/form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/form-procs.tcl,v
diff -u -r1.13.2.4 -r1.13.2.5
--- openacs-4/packages/forums/tcl/form-procs.tcl	19 Jun 2019 17:26:58 -0000	1.13.2.4
+++ openacs-4/packages/forums/tcl/form-procs.tcl	16 Feb 2021 06:54:52 -0000	1.13.2.5
@@ -32,7 +32,7 @@
         -label [_ forums.Subject] \
         -datatype text \
         -widget text \
-        -html {size 60} \
+        -html {maxlength 200 size 60} \
         $optional_switch
 
     template::element create $form_name ${prefix}message_body \