- $heap->{irc}->yield(notice => $scan->{nick}, "($scan->{coords} $scan->{type})"
- ." http://game.planetarion.com/showscan.pl?scan_id=$scan->{scan_id}");
+ $self->message("($scan->{coords} $scan->{type})"
+ ." http://game.planetarion.com/showscan.pl?scan_id=$scan->{scan_id}"
+ , @{$scan->{nick}});