X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fregistered.pl;h=4876aea2a7d6f9740f413eda68422f7f389b0afe;hb=1a9286080b21d5b65f97cab08d8a493abafad8f1;hp=71ed0e38a4609c7b15cbd68827dd54a809b3e9de;hpb=36476fc1fa5aeefc5d34ff9e8bb9c08fafcfe589;p=spider.git

diff --git a/cmd/show/registered.pl b/cmd/show/registered.pl
index 71ed0e38..4876aea2 100644
--- 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;