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.18 -r1.19
--- openacs-4/packages/contacts/tcl/contact-message-procs.tcl	27 Jan 2006 16:25:23 -0000	1.18
+++ openacs-4/packages/contacts/tcl/contact-message-procs.tcl	29 Jan 2006 16:17:20 -0000	1.19
@@ -359,6 +359,8 @@
 	###############
 	set pdf_filename $oo_file
 	set mime_type "application/odt"
+    } else {
+	ns_unlink $oo_file
     }
 
     if {$no_import_p} {
@@ -394,7 +396,6 @@
     }	
 
     ns_unlink $pdf_filename
-    ns_unlink $oo_file
 
     content::item::set_live_revision -revision_id $revision_id
     return [content::revision::item_id -revision_id $revision_id]