Index: openacs-4/packages/contacts/tcl/contact-message-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contact-message-procs.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/contacts/tcl/contact-message-procs.tcl	27 Dec 2005 20:19:02 -0000	1.14
+++ openacs-4/packages/contacts/tcl/contact-message-procs.tcl	31 Dec 2005 07:39:39 -0000	1.15
@@ -348,6 +348,9 @@
     # Strip the extension.
     set pdf_filename "[file rootname $oo_file].pdf"
     if {![file exists $pdf_filename]} {
+	###############
+	# this is a fix to use the oo file if pdf file could not be generated
+	###############
 	set pdf_filename $oo_file
     }
     set pdf_filesize [file size $pdf_filename]
@@ -398,6 +401,7 @@
     foreach filename [array names content_array] {
 	# Save the content to a file.
 	set file [open "${dir}/$filename" w]
+	fconfigure $file -encoding utf-8
 	puts $file $content_array($filename)
 	flush $file
 	close $file