provide errorCode for invalid reverse addrs

[chiark-tcl.git] / adns / adns.c

diff --git a/adns/adns.c b/adns/adns.c
index 2ff423e3b9cddfa45530da0af38e3333ae684e0c..30d036bd5f89e86f9eab09b7521a6dfb165eaaae 100644 (file)
--- a/adns/adns.c
+++ b/adns/adns.c
@@ -469,7 +469,8 @@ static int query_submit(Tcl_Interp *ip,
       r= inet_pton(*af,domain,&sa);
       if (!r) goto af_found;
     }
-    return cht_staticerr(ip,"invalid address for adns reverse submit","");
+    return cht_staticerr(ip,"invalid address for adns reverse submit",
+                        "ADNS REVERSE INVALID");
   af_found:;
   }