From efbbe3591e3bd13f69f1a498066f420c85122cf0 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 9 Oct 2010 12:49:47 -0700
Subject: [PATCH] Rename combinator in dns

---
 extra/dns/dns.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/extra/dns/dns.factor b/extra/dns/dns.factor
index 54bb03b008..a0e6ba5f6e 100644
--- a/extra/dns/dns.factor
+++ b/extra/dns/dns.factor
@@ -9,7 +9,7 @@ math.parser namespaces nested-comments random sequences
 slots.syntax splitting system vectors vocabs.loader ;
 IN: dns
 
-: with-temporary-input-seek ( n seek-type quot -- )
+: with-input-seek ( n seek-type quot -- )
     tell-input [
         [ seek-input ] dip call
     ] dip seek-absolute seek-input ; inline
@@ -175,7 +175,7 @@ CONSTANT: ipv6-arpa-suffix ".ip6.arpa"
             8 shift read1 bitor HEX: 3fff bitand
             seek-absolute [
                 read1 parse-length-bytes , (parse-name)
-            ] with-temporary-input-seek
+            ] with-input-seek
         ] [
             parse-length-bytes , (parse-name)
         ] if