Index: openacs-4/packages/acs-subsite/www/user/portrait/upload.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/portrait/upload.tcl,v diff -u -r1.22.2.1 -r1.22.2.2 --- openacs-4/packages/acs-subsite/www/user/portrait/upload.tcl 25 Jun 2019 16:34:11 -0000 1.22.2.1 +++ openacs-4/packages/acs-subsite/www/user/portrait/upload.tcl 25 Jun 2019 16:35:41 -0000 1.22.2.2 @@ -10,7 +10,7 @@ last_name:onevalue context:onevalue export_vars:onevalue - + } set current_user_id [ad_conn user_id] @@ -103,13 +103,13 @@ # generality implicit in the following if statement) {upload_file - + { $mime_types eq "" || [lsearch $mime_types [ns_guesstype $upload_file]] > -1 } {Your image wasn't one of the acceptable MIME types: $mime_types} } {upload_file - { $max_bytes eq "" || [file size [ns_queryget upload_file.tmpfile]] <= $max_bytes } + { $max_bytes eq "" || [file size [ns_queryget upload_file.tmpfile]] <= $max_bytes } {Your file is too large. The publisher of [ad_system_name] has chosen to limit portraits to [util::content_size_pretty -size $max_bytes]. You can use PhotoShop or the GIMP (free) to shrink your image} } @@ -122,7 +122,7 @@ -description $portrait_comment \ -filename $upload_file \ -file [ns_queryget upload_file.tmpfile] - + } } -after_submit {