Sat Jun 18 23:16:27 UTC 2011  pix@kepibu.org
  * Send cliki reverter thread output to swank's standard-io (the repl in emacs)
diff -rN -u old-claki/claki.lisp new-claki/claki.lisp
--- old-claki/claki.lisp	2013-07-22 16:03:45.000000000 +0000
+++ new-claki/claki.lisp	2013-07-22 16:03:45.000000000 +0000
@@ -239,7 +239,10 @@
     (save-state))
   (format t "; Run ended at ~a~%~%" (now)))
 
-#+(or) (sb-thread:make-thread #'run-for-a-while :name "cliki reverter")
+#+(or)
+ (let ((stdout *standard-output*))
+   (sb-thread:make-thread (lambda () (let ((*standard-output* stdout)) (run-for-a-while)))
+                          :name "cliki reverter"))
 
 (defvar *state-file* (or #.*load-pathname* #p"/home/pixel/repos/claki/state/"))