(defn get-imcomplete-task-summaries [membername]
      (.then (fetch-data)
             (fn [data]
               (sort-by :time
                        (for [task (:tasks data)
                              :when (= membername (:username task))
                              :when (not (:complete task))]
                          task ;; immutable, no need to copy
                          )))))