diff --git a/worktimer.scm b/worktimer.scm
index 343b0f9..44e11db 100755
--- a/worktimer.scm
+++ b/worktimer.scm
@@ -323,6 +323,7 @@
           (format (current-error-port) "Nothing to stop\n")
           #f))))
 
+;;; Print report
 (define (cmd-report sheet . params)
   (format #t "--- REPORT")
   (let ((sheet