Index: openacs-4/packages/mail-tracking/www/one-message.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/mail-tracking/www/one-message.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/mail-tracking/www/one-message.tcl	14 Nov 2006 07:17:56 -0000	1.9
+++ openacs-4/packages/mail-tracking/www/one-message.tcl	27 Nov 2006 13:37:27 -0000	1.10
@@ -35,10 +35,14 @@
     set cc ""
 }
 
-if {$contacts_package_id} {
-    set sender "<a href=\"[contact::url -party_id $sender_id  -package_id $contacts_package_id]\">[party::name -party_id $sender_id]</a>"
+if {[exists_and_not_null sender_id]} {
+    if {$contacts_package_id} {
+	set sender "<a href=\"[contact::url -party_id $sender_id  -package_id $contacts_package_id]\">[party::name -party_id $sender_id]</a>"
+    } else {
+	set sender [party::name -party_id $sender_id]
+    }
 } else {
-    set sender [party::name -party_id $sender_id]
+    set sender "Unknown"
 }
 
 set reciever_list [list]