mega-merge of major parts of mojo

[spider.git] / cmd / talk.pl

diff --git a/cmd/talk.pl b/cmd/talk.pl
index acd2eba54f84e6a70a73a826a18924b78532c70e..dae38e243be0d56b8f1378fd57e8f4bcf067e28b 100644 (file)
--- a/cmd/talk.pl
+++ b/cmd/talk.pl
@@ -33,7 +33,7 @@ return (1, $self->msg('e8')) unless $to;
 $to = uc $to;
 
 return (1, $self->msg('e22', $to)) unless is_callsign($to);
-return (1, $self->msg('e28')) unless $self->registered || $to eq $main::myalias;
+return (1, $self->msg('e28')) unless $self->isregistered || $to eq $main::myalias;
 
 $via = uc $via if $via;
 my $call = $via || $to;