diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el
index 298ed66..8bd031e 100644
--- a/site-lisp/db-org.el
+++ b/site-lisp/db-org.el
@@ -1041,21 +1041,21 @@ TEND.  Each element in this list is of the form
 where START, END, MARKER are as return from
 `db/org-clocking-time-in-range’, which see.  Entries in the
 resulting list are sorted by START, ascending."
-  (->> (or files org-agenda-files)
-       (cl-remove-if-not #'file-exists-p)
-       (cl-mapcan #'(lambda (file)
-                      (with-current-buffer (or (get-file-buffer file)
-                                               (find-file-noselect file))
-                        (db/org-clocking-time-in-range tstart tend))))
-       (cl-mapcan #'(lambda (task)
-                      (mapcar #'(lambda (clock-time)
-                                  (list (car clock-time)
-                                        (cdr clock-time)
-                                        (car task)))
-                              (cdr task))))
-       ((lambda (timeline)              ; narf
-          (cl-sort timeline (lambda (entry-1 entry-2)
-                              (< (car entry-1) (car entry-2))))))))
+  (let (timeline-of-files turned-around-timeline)
+    (setq timeline
+          (->> (or files org-agenda-files)
+               (cl-remove-if-not #'file-exists-p)
+               (cl-mapcan #'(lambda (file)
+                              (with-current-buffer (or (get-file-buffer file)
+                                                       (find-file-noselect file))
+                                (db/org-clocking-time-in-range tstart tend))))))
+    (dolist (entry timeline)
+      (dolist (clock-time (cdr entry))
+        (push (list (car clock-time) (cdr clock-time) (car entry))
+              turned-around-timeline)))
+    (cl-sort turned-around-timeline
+             (lambda (entry-1 entry-2)
+               (< (car entry-1) (car entry-2))))))
 
 (defun db/org-format-timeline (tstart tend &optional files)
   "Display timeline of tasks in FILES between TSTART and TEND.