Index: openacs-4/packages/file-storage/tcl/file-storage-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs.tcl,v diff -u -r1.42.2.22 -r1.42.2.23 --- openacs-4/packages/file-storage/tcl/file-storage-procs.tcl 17 Mar 2005 13:11:29 -0000 1.42.2.22 +++ openacs-4/packages/file-storage/tcl/file-storage-procs.tcl 18 Mar 2005 12:09:58 -0000 1.42.2.23 @@ -949,7 +949,12 @@ append text_version "[_ file-storage.lt_View_folder_contents_]" set html_version [ad_html_text_convert -from text/plain -to text/html -- $text_version] - append html_version "

" + + # For whatever the reason, ad_html_text_convert somehow returns the text with \\n instead of
inserted. + # Too busy to find out now. Needs fixing l8er. + regsub -all {\\n} $html_version {
} html_version + + # append html_version "

" # Do the notification for the file-storage notification::new \ @@ -969,7 +974,8 @@ -short_name fs_fs_notif] \ -object_id $parent_id \ -notif_subject "[_ file-storage.lt_File_Storage_Notifica]" \ - -notif_text $new_content + -notif_text $text_version \ + -notif_html $html_version set folder_id $parent_id } }