kmx.io/cl-thot

diff --git a/thot.lisp b/thot.lisp
index 98eb557..45e304a 100644
--- a/thot.lisp
+++ b/thot.lisp
@@ -6,8 +6,9 @@
 (in-package :thot)
 
 (setf (debug-p :thot) t)
-;;(setf (debug-p :directory) t)
-;;(setf (debug-p :file) t)
+(setf (debug-p :directory) t)
+(setf (debug-p :file) t)
+(setf (debug-p :mime) t)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (unless (boundp '+crlf+)