diff --git a/source/clog-base.lisp b/source/clog-base.lisp
index 38d91c4..0b61539 100644
--- a/source/clog-base.lisp
+++ b/source/clog-base.lisp
@@ -365,7 +365,7 @@ result or if time out DEFAULT-ANSWER. see JQUERY-QUERY (Internal)"))
               (t
                (unbind-event-script obj event)
                (remhash hook cd)))
-        (format t "Attempt to set event on non-existant connection."))))
+        (format t "Attempt to set event on non-existant connection.~%"))))
 
 ;;;;;;;;;;;;;;
 ;; property ;;
diff --git a/source/clog-system.lisp b/source/clog-system.lisp
index 7372734..a08fc96 100644
--- a/source/clog-system.lisp
+++ b/source/clog-system.lisp
@@ -34,7 +34,7 @@ the same as the clog directy this overides the relative paths used in them.")
 
 (defun on-connect (connection-id)
   (when clog-connection:*verbose-output*
-    (format t "Start new window handler on connection-id - ~A" connection-id))
+    (format t "Start new window handler on connection-id - ~A~%" connection-id))
   (let ((body (make-clog-body connection-id)))
     (let* ((path          (if clog-connection::*long-poll-url*
                               clog-connection::*long-poll-url*