diff options
-rw-r--r-- | granolin.asd | 2 | ||||
-rw-r--r-- | granolin.lisp | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/granolin.asd b/granolin.asd index 35fb34e..4ca567a 100644 --- a/granolin.asd +++ b/granolin.asd @@ -6,7 +6,7 @@ :license "AGPLv3.0" :version "0.0.1" :serial t - :depends-on (#:drakma #:jonathan) + :depends-on (#:drakma #:jonathan #:local-time) :components ((:file "package") (:file "macros") (:file "utils") diff --git a/granolin.lisp b/granolin.lisp index 62718d1..c0bd998 100644 --- a/granolin.lisp +++ b/granolin.lisp @@ -592,7 +592,9 @@ (unwind-protect (loop :while (running-p client) :do (handler-case (sync client) - (error (c) (format *error-output* "Error during Event Sync: ~a~%~%" c)))) + (error (c) (format *error-output* "~a Error during Event Sync: ~a~%~%" + (local-time:now) + c)))) (clean-up client))) (defun stop (client) |