removed debugging printf
This commit is contained in:
@@ -14,7 +14,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.2 2000/11/18 00:18:25 gson Exp $
|
||||
# $Id: lookup.tcl,v 1.3 2000/11/18 00:29:28 gson Exp $
|
||||
#
|
||||
|
||||
#
|
||||
@@ -23,7 +23,6 @@
|
||||
|
||||
proc lookup {zone name} {
|
||||
global dbargs
|
||||
puts $zone
|
||||
switch -- $name {
|
||||
@ { return [list \
|
||||
{SOA 86400 "ns.isp.nil. hostmaster.isp.nil. 0 3600 1800 1814400 3600"} \
|
||||
|
||||
@@ -14,7 +14,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.2 2000/11/18 00:18:25 gson Exp $
|
||||
# $Id: lookup.tcl,v 1.3 2000/11/18 00:29:28 gson Exp $
|
||||
#
|
||||
|
||||
#
|
||||
@@ -23,7 +23,6 @@
|
||||
|
||||
proc lookup {zone name} {
|
||||
global dbargs
|
||||
puts $zone
|
||||
switch -- $name {
|
||||
@ { return [list \
|
||||
{SOA 86400 "ns.isp.nil. hostmaster.isp.nil. 0 3600 1800 1814400 3600"} \
|
||||
|
||||
Reference in New Issue
Block a user