From afb474d44cd47403f08c582b478e3c5ad0f648e3 Mon Sep 17 00:00:00 2001
From: Daniel Borchmann <daniel@algebra20.de>
Date: Sat, 2 Dec 2017 21:27:34 +0100
Subject: [PATCH] [Org] Add convenience function to format report for a
 particular day

---
 site-lisp/db-org.el | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el
index bac2baf..1f1ffca 100644
--- a/site-lisp/db-org.el
+++ b/site-lisp/db-org.el
@@ -1087,6 +1087,17 @@ When not given, FILES defaults to `org-agenda-files’."
       (display-buffer target-buffer)
       t)))
 
+(defun db/org-format-timeline-of-day (date &optional files)
+  "Format timeline of given DATE.
+DATE should be a string of the form %Y-%m-%d.  The timeline will
+be formatted for this day, starting at 00:00 and ending at
+23:59 (sorry, no leap seconds supported yet).  When not given,
+FILES defaults to `org-agenda-files’."
+  (interactive "sDate: ")
+  (db/org-format-timeline (concat date " 00:00")
+                          (concat date " 23:59")
+                          files))
+
 
 ;;; End