diff --git a/proxy.rkt b/proxy.rkt
index 807af83..9d4a075 100644
--- a/proxy.rkt
+++ b/proxy.rkt
@@ -30,7 +30,7 @@
 
   (define boot-server
     (os-big-bang 'no-state
-		 (spawn dns-spy)
+		 ;;(spawn dns-spy)
 		 (send-meta-message `(request create-server-socket (udp new ,port-number 512)))
 		 (subscribe 'wait-for-server-socket
 			    (meta-message-handlers w
@@ -62,7 +62,7 @@
       (transition old-state (spawn (request-handler zone r c)))]))
 
   (ground-vm (os-big-bang (void)
-			  (spawn udp-spy)
+			  ;;(spawn udp-spy)
 			  (spawn udp-driver)
 			  (spawn (nested-vm boot-server)))))
 
@@ -80,6 +80,8 @@
   (define question (and (pair? (dns-message-questions request-message))
 			(car (dns-message-questions request-message))))
 
+  (write `(Looking up ,question)) (newline)
+
   (define (make-reply answers authorities additional)
     (dns-message (dns-message-id request-message)
 		 'response
@@ -97,7 +99,7 @@
   (define (resolver-actions qr)
     (match qr
       [(resolver-network-query q zone ns-rr addresses k) ;; need subquestion answered
-       (write `(INTERMEDIATE ,q ,ns-rr (,(length addresses) addresses))) (newline)
+       ;;(write `(INTERMEDIATE ,q ,ns-rr (,(length addresses) addresses))) (newline)
        (network-query/addresses client-sock q zone ns-rr addresses
 				(lambda (qr) (resolver-actions (k qr))))]
       [#f ;; got a name-error/NXDOMAIN from some nameserver