From 3c0454fe259ed70a752d49b86a46026fb4f0c733 Mon Sep 17 00:00:00 2001 From: Andreas Gustafsson Date: Sat, 18 Nov 2000 01:35:05 +0000 Subject: [PATCH] make SOA MNAME and NS records consistent; keep lines under 80 columns --- contrib/sdb/lookup.tcl | 9 +++++---- contrib/sdb/tcl/lookup.tcl | 9 +++++---- 2 files changed, 10 insertions(+), 8 deletions(-) diff --git a/contrib/sdb/lookup.tcl b/contrib/sdb/lookup.tcl index aced004162..c6887b3ef9 100644 --- a/contrib/sdb/lookup.tcl +++ b/contrib/sdb/lookup.tcl @@ -13,7 +13,7 @@ # NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION # WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -# $Id: lookup.tcl,v 1.4 2000/11/18 01:29:11 bwelling Exp $ +# $Id: lookup.tcl,v 1.5 2000/11/18 01:35:05 gson Exp $ # # Sample lookup procedure for tcldb @@ -23,9 +23,10 @@ proc lookup {zone name} { global dbargs switch -- $name { @ { return [list \ - {SOA 86400 "ns.isp.nil. hostmaster.isp.nil. 0 3600 1800 1814400 3600"} \ - {NS 86400 "ns1"} \ - {NS 86400 "ns2"} \ + {SOA 86400 "ns1.isp.nil. hostmaster.isp.nil. \ + 0 3600 1800 1814400 3600"} \ + {NS 86400 "ns1.isp.nil."} \ + {NS 86400 "ns2.isp.nil."} \ {MX 86400 "10 mail.isp.nil."} ] } www { return [list [list A 3600 $dbargs($zone)] ] } } diff --git a/contrib/sdb/tcl/lookup.tcl b/contrib/sdb/tcl/lookup.tcl index aced004162..c6887b3ef9 100644 --- a/contrib/sdb/tcl/lookup.tcl +++ b/contrib/sdb/tcl/lookup.tcl @@ -13,7 +13,7 @@ # NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION # WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -# $Id: lookup.tcl,v 1.4 2000/11/18 01:29:11 bwelling Exp $ +# $Id: lookup.tcl,v 1.5 2000/11/18 01:35:05 gson Exp $ # # Sample lookup procedure for tcldb @@ -23,9 +23,10 @@ proc lookup {zone name} { global dbargs switch -- $name { @ { return [list \ - {SOA 86400 "ns.isp.nil. hostmaster.isp.nil. 0 3600 1800 1814400 3600"} \ - {NS 86400 "ns1"} \ - {NS 86400 "ns2"} \ + {SOA 86400 "ns1.isp.nil. hostmaster.isp.nil. \ + 0 3600 1800 1814400 3600"} \ + {NS 86400 "ns1.isp.nil."} \ + {NS 86400 "ns2.isp.nil."} \ {MX 86400 "10 mail.isp.nil."} ] } www { return [list [list A 3600 $dbargs($zone)] ] } }