Commit 8dfae16d106ad5f1f33c4f0b038f88bf54735198

Thomas de Grivel 2017-06-21T11:33:23

untabify

diff --git a/log.lisp b/log.lisp
index 4d9bdcb..45dd323 100644
--- a/log.lisp
+++ b/log.lisp
@@ -32,13 +32,13 @@
 
 (defun log-msg (level fmt &rest args)
   (let ((*print-case* :upcase)
-	(*print-pretty* nil))
+        (*print-pretty* nil))
     (format *log-output* "~&~A ~?~%" level fmt args)
     (force-output *log-output*)))
 
 (defmacro with-logged-warnings (&body body)
   `(handler-bind ((warning
-		   (lambda (w)
-		     (log-msg :warn "~A" w)
-		     (muffle-warning w))))
+                   (lambda (w)
+                     (log-msg :warn "~A" w)
+                     (muffle-warning w))))
      ,@body))