Fix format example

tktest/tk-test.lisp

@@ -27,11 +27,12 @@
 								  :command (lambda ()
 											 (echo-durr))))
 		  ;; Format doesn't seem to work until the gui ends
+		  ;; Turns out we need to add ~%
 		  (button3 (make-instance 'button
 								  :text "try format"
 								  :command (lambda ()
-											 (format *standard-output*
-													 "hi"))))
+											 (format t
+													 "hi~%"))))
 		  (scroller (make-instance 'scrollbar
 								   )))
 	  (grid button 0 0)