Index: openacs-4/packages/chat/lib/current-messages.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/lib/current-messages.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/chat/lib/current-messages.tcl 30 Mar 2006 09:15:12 -0000 1.1.2.1 +++ openacs-4/packages/chat/lib/current-messages.tcl 7 Apr 2006 16:59:51 -0000 1.1.2.2 @@ -7,5 +7,9 @@ } db_multirow -extend { person_name } messages select_msg_itens $sql { - set person_name [chat_user_name $creation_user] + if { $creation_user eq 0 } { + set person_name "Nobody" + } else { + set person_name [chat_user_name $creation_user] + } }