From e646e27f94496d005f531de3eb525fd4d4161e9f Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sat, 11 Sep 2010 17:03:00 +0000
Subject: dns updates from Erik L: add ttl support, add check for SRV and
 finish allowing additional rectypes, allow forward slashes for RFC2317
 classless in-arpa delegation, RT#8933

---
 httemplate/view/svc_domain/dns.html | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'httemplate')

diff --git a/httemplate/view/svc_domain/dns.html b/httemplate/view/svc_domain/dns.html
index 88a9bda95..11aba825f 100644
--- a/httemplate/view/svc_domain/dns.html
+++ b/httemplate/view/svc_domain/dns.html
@@ -21,6 +21,7 @@ DNS records
     <th CLASS="grid" BGCOLOR="#cccccc">Zone</th>
     <th CLASS="grid" BGCOLOR="#cccccc">Type</th>
     <th CLASS="grid" BGCOLOR="#cccccc">Data</th>
+    <th CLASS="grid" BGCOLOR="#cccccc">TTL</th>
   </tr>
 
 % foreach my $domain_record ( @records ) {
@@ -32,7 +33,9 @@ DNS records
     <tr>
       <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->reczone %></td>
       <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $type %></td>
-      <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->recdata %>
+      <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->recdata %></td>
+      <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->ttl %></td>
+      <td CLASS="grid" BGCOLOR="<% $bgcolor %>">
 
 % unless ( $domain_record->rectype eq 'SOA'
 %          || ! $FS::CurrentUser::CurrentUser->access_right('Edit domain nameservice')
@@ -66,6 +69,7 @@ DNS records
 %       } 
       </SELECT>
       <INPUT TYPE="text" NAME="recdata">
+      <INPUT TYPE="text" NAME="ttl" size="6">
       <INPUT TYPE="submit" VALUE="Add record">
     </FORM>
 
-- 
cgit v1.2.1