From 3a5bcdcc7ed692546b7b8bd16db5fd0fdbafbab5 Mon Sep 17 00:00:00 2001
From: Marco d'Itri <md@linux.it>
Date: Tue, 31 Dec 2019 02:57:51 +0100
Subject: [PATCH] Generalize the support for Afilias-style referrals

---
 make_tld_serv.pl | 2 +-
 whois.c          | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/make_tld_serv.pl b/make_tld_serv.pl
index 0734702..f3ad024 100755
--- a/make_tld_serv.pl
+++ b/make_tld_serv.pl
@@ -15,7 +15,7 @@ while (<>) {
 	$b =~ s/^W(?:EB)?\s+/\\x01/;
 	$b =~ s/^VERISIGN\s+/\\x04" "/;
 	$b = "\\x03" if $b eq 'NONE';
-	$b = "\\x08" if $b eq 'AFILIAS';
+	$b = "\\x08whois.afilias-grs.info" if $b eq 'AFILIAS';
 	$b = "\\x0C" if $b eq 'ARPA';
 	$b = "\\x0D" if $b eq 'IP6';
 	print qq|    "$a",\t"$b",\n|;
diff --git a/whois.c b/whois.c
index 608153b..ac23c06 100644
--- a/whois.c
+++ b/whois.c
@@ -344,8 +344,8 @@ int handle_query(const char *hserver, const char *hport,
 	    break;
 	case 8:
 	    if (verb)
-		printf(_("Using server %s.\n"), "whois.afilias-grs.info");
-	    sockfd = openconn("whois.afilias-grs.info", NULL);
+		printf(_("Using server %s.\n"), server + 1);
+	    sockfd = openconn(server + 1, NULL);
 	    free(server);
 	    server = query_afilias(sockfd, query);
 	    break;