;; This buffer is for text that is not saved, and for Lisp evaluation.
;; To create a file, visit it with C-x C-f and enter text in its buffer.

(let ((report (get-report "Income vs. Day of Week")))
  (set-option! report "General" "End Date" 'today)
  (run-report "income.html"))

(let ((report (get-report "Expenses vs. Day of Week")))
  (set-option! report "General" "End Date" 'today)
  (set-option! report "General" "Report Title"
               (format #f "expenses for today ~a" (current-time)))
  (run-report "expenses.html"))