fix registration checking on call+ssid

[spider.git] / cmd / show / registered.pl

diff --git a/cmd/show/registered.pl b/cmd/show/registered.pl
index 71ed0e38a4609c7b15cbd68827dd54a809b3e9de..4876aea2a7d6f9740f413eda68422f7f389b0afe 100644 (file)
--- a/cmd/show/registered.pl
+++ b/cmd/show/registered.pl
@@ -62,6 +62,7 @@ sub generate
        }
 
        my @l;
+       push @out, "Registration is " . ($main::reqreg ? "Required" :  "NOT Required");
        foreach my $call (@val) {
                if (@l >= 5) {
                        push @out, sprintf "%-14s %-14s %-14s %-14s %-14s", @l;