   []
   (try
     (infof "delete-trash")
-    (let [trash-id -1
-          {:keys [:bookmark/parent-id :bookmark/link-count]} (get @bookmarks trash-id)
+    (let [{:keys [:bookmark/parent-id]} (get @bookmarks trash-id)
           changed-ids [parent-id trash-id]
           deleted-ids (get-in @bookmarks [trash-id :bookmark/children])]
       ;; Remove deleted bookmarks from the cache.


(timbre/refer-timbre)

(defn build-response "Build a response with the changed bookmarks."
  [changed-ids]
  (let [latest-revision (ds/get-latest-revision)]

  [folder]
  (let [[links folders] (map vec ((juxt filter remove) #(:bookmark/url (get @bookmarks %))
                                   (:bookmark/children folder)))
        make-sort-key #(cond
                         (= (:bookmark/id (get @bookmarks %)) trash-id) "~~~TRASH"
                         (:bookmark/title (get @bookmarks %))
                         (str/upper-case (:bookmark/title (get @bookmarks %)))
                         :else (do (warn (str "NO TITLE" % (str (get @bookmarks %)))) ""))]
    (update folder :bookmark/children
            (fn [_] (into [] (concat (if (empty? folders) folders (sort-by make-sort-key folders))
                                     (if (empty? links) links (sort-by make-sort-key links))))))))
