Index: openacs-4/packages/contacts/www/files.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/files.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/contacts/www/files.tcl	16 Jun 2005 08:18:50 -0000	1.4
+++ openacs-4/packages/contacts/www/files.tcl	28 Jun 2005 20:04:49 -0000	1.5
@@ -100,8 +100,10 @@
 	incr upload_number
     }
     if {[llength $message] == 1} {
+	set message [lindex $message 1]
 	util_user_message -html -message "[_ contacts.lt_The_file_lindex_messa]"
     } elseif {[llength $message] > 1} {
+	set message [join $message ", "]
 	util_user_message -html -message "[_ contacts.lt_The_files_join_messag]"
     }
 } -after_submit {