kmx.io/cl-thot

diff --git a/thot.lisp b/thot.lisp
index 05c247d..4a615b4 100644
--- a/thot.lisp
+++ b/thot.lisp
@@ -577,6 +577,7 @@ The requested url "
   (let ((flags (the fixnum (fcntl:getfl fd))))
     (fcntl:setfl fd (logior fcntl:+o-nonblock+ flags))))
 
-;(trace socket:socket socket:bind socket:bind-inet unistd:close unistd:c-close)
+(trace socket:socket socket:bind socket:bind-inet unistd:close unistd:c-close)
 ;(trace header content)
 ;(trace request-cont file-handler directory-handler call-handler-form call-handler)
+;(untrace file-handler c-stat)