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.5 -r1.28.2.6
--- openacs-4/packages/file-storage/www/file-add.tcl	18 Feb 2022 12:56:48 -0000	1.28.2.5
+++ openacs-4/packages/file-storage/www/file-add.tcl	24 Aug 2022 08:58:59 -0000	1.28.2.6
@@ -35,6 +35,10 @@
         }
     }
     max_size -requires {upload_file} {
+        if {![info exists upload_file.tmpfile]} {
+            ad_complain {Invalid file}
+            return
+        }
         set n_bytes [ad_file size ${upload_file.tmpfile}]
         set max_bytes [fs::max_upload_size]
         if { $n_bytes > $max_bytes } {