Index: openacs-4/packages/file-storage/www/file-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-add.tcl,v
diff -u -N -r1.28.2.7 -r1.28.2.8
--- openacs-4/packages/file-storage/www/file-add.tcl	27 Nov 2022 10:52:26 -0000	1.28.2.7
+++ openacs-4/packages/file-storage/www/file-add.tcl	27 Jan 2023 11:59:05 -0000	1.28.2.8
@@ -132,13 +132,15 @@
     ad_form -extend -form {
         {title:text(hidden)
             {value $title}
+            {maxlength 1000}
         }
     }
 } else {
     ad_form -extend -form {
         {title:text,optional
             {label "#file-storage.Title#"}
             {html {size 30}}
+            {maxlength 1000}
         }
     }
 }
Index: openacs-4/packages/file-storage/www/file-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-edit.tcl,v
diff -u -N -r1.13 -r1.13.2.1
--- openacs-4/packages/file-storage/www/file-edit.tcl	19 Jan 2018 12:03:41 -0000	1.13
+++ openacs-4/packages/file-storage/www/file-edit.tcl	27 Jan 2023 11:59:05 -0000	1.13.2.1
@@ -34,6 +34,7 @@
 ad_form -export file_id -form {
     {title:text(text) 
         {label "[_ file-storage.Title]"}
+        {maxlength 1000}
         {value $title}
         {help_text $title_help} 
     }