remove references to iscallsign

[spider.git] / perl / client.pl

diff --git a/perl/client.pl b/perl/client.pl
index ff2ca473f82b03451e0f023d7d72d3ee6e9adc5b..b36be34715282605f542948529e1c2f96e375dc4 100755 (executable)
--- a/perl/client.pl
+++ b/perl/client.pl
@@ -419,7 +419,7 @@ if ($loginreq) {
        $s =~ s/\s+//og;
        $s =~ s/-\d+$//o;            # no ssids!
        cease(0) unless $s && $s gt ' ';
-       unless (iscallsign($s)) {
+       unless (is_callsign($s)) {
                $stdout->print("Sorry, $s is an invalid callsign");
                cease(0);
        }