Index: openacs-4/packages/file-storage/www/simple-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-add.tcl,v
diff -u -r1.17.2.4 -r1.17.2.5
--- openacs-4/packages/file-storage/www/simple-add.tcl	31 Mar 2022 07:05:47 -0000	1.17.2.4
+++ openacs-4/packages/file-storage/www/simple-add.tcl	31 Mar 2022 07:10:39 -0000	1.17.2.5
@@ -53,11 +53,11 @@
 if {$lock_title_p} {
     ad_form -extend -form {
         {title_display:text(inform) {label \#file-storage.Title\#} {value $title}}
-        {title:text(hidden) {value $title}}
+        {title:text(hidden) {value $title} {maxlength 1000}}
     }
 } else {
     ad_form -extend -form {
-        {title:text {label \#file-storage.Title\#} {html {size 30}} }
+        {title:text {label \#file-storage.Title\#} {html {size 30}} {maxlength 1000}}
     }
 }
 
@@ -67,6 +67,7 @@
     {url:text(url)
         {label \#file-storage.URL\#}
         {value "https://"}
+        {maxlength 1000}
     }
     {description:text(textarea),optional
         {html {rows 5 cols 50}}