diff --git a/src/cuirass/logging.scm b/src/cuirass/logging.scm
index 97eb6f7c9a09a6d794cd1b889f0e306182c2cb84..3982ef251f6fd40a069d18681a33027f39c903fb 100644
--- a/src/cuirass/logging.scm
+++ b/src/cuirass/logging.scm
@@ -84,7 +84,14 @@
   (make-parameter #f))
 
 (define (log-query query time)
-  (format (query-logging-port) "~a ~,2f~%"
+  (define now
+    (current-time time-utc))
+
+  (define date
+    (date->string (time-utc->date now) "~5"))
+
+  (format (query-logging-port) "~a ~a ~,2f~%"
+          date
           (string-join
            (string-tokenize query
                             (char-set-complement