Index: gui.tcl
===================================================================
--- gui.tcl	(revisión: 11907)
+++ gui.tcl	(copia de trabajo)
@@ -2235,7 +2235,6 @@
 					write_remote "From $chatid : $msg" msgrcv
 				}
 			}
-
 			PutMessage $chatid $user $nick $msg $type $fontformat $p4c
 		}
 	}
@@ -3711,7 +3710,11 @@
 				set evpar(login) $user
 				::plugins::PostEvent parse_contact evpar
 			} elseif {[::abook::getPersonal login] ne $user} {
-				set original_nick [::abook::getNick $user 1]
+                set original_nick [::abook::getVolatileData $user parsed_customfnick]
+                #if customfnick doesn't exists replace with nick
+                if { [::abook::removeStyles $original_nick] eq "" } {
+                    set original_nick [::abook::getNick $user 1]
+                }
 			} else {
 				set original_nick [::abook::getVolatileData myself parsed_mfn]
 			}