support "removed" TLDs

be9b24f7 · Gavin Brown · 4b560c29 · be9b24f7
Unverified Commit be9b24f7 authored Mar 07, 2019 by Gavin Brown
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 1 deletion

rootrdap.pl rootrdap.pl +4 -1

No files found.
--- a/rootrdap.pl
+++ b/rootrdap.pl
@@ -58,7 +58,10 @@ if (!-e $list || stat($list)->mtime <= time()-86400) {

 my @tlds = map { chomp ; lc } grep { /^[A-Z0-9-]+$/ } read_file($list);

-my $status = { 'active' => 1 };
+my $status = {
+	'active' => 1,
+	'removed' => 1,
+};

 print STDERR "Generating files\n";