                                                 (* 60 (Long/parseLong hours))))))
               scheduled (get-timestamp scheduled-finder true)
               deadline  (get-timestamp deadline-finder true)
+              tags (reduce into #{} tags-with-ancestors)
               base (with-meta
                      {:todo               (if (contains? DONE-states todo) nil todo)
                       :done               (if (contains? DONE-states todo) todo)

                                   :priority-cookie
                                   (re-find #"\d")))
                 (remove #(contains? (:tags %) "slow"))
                 (keep (fn [{:keys [todo header deadline] :as item}]
                         (if (and deadline (compare/<= (to-local-date deadline) today))
                           {:deadlines #{item}}
                           (if-let [d (relevant-date item)]
                             (if-not (compare/< today+10 d)
                               {(compare/max today d) #{item}})
                             {:triage #{item}}))))
                 (apply merge-with into))
          calendar-events (->> deets-by-file
                               vals

                                                             t2 (some-> t2 .toLocalTime)]
                                                         (assoc item
                                                                :timetable-slot [t1 t2]
                                                                :past? past?)))))}])
        sort-key (juxt (comp - priority) :created-at :file :line-number)]
    {:deadlines (sort-by sort-key deadlines)
     :triage    (sort-by sort-key triage)
     :backlog   (sort-by sort-key backlog)
     :today     (second (first not-past))
     :future    (rest not-past)
     :past      (for [[date :as date+item] (reverse (sort by-day))
