 
 (defn remove-file
   [local id]
+  (swap! local update-in [:files] dissoc id)
+  (dom/remove! (dom/by-id id))
+  (when (empty? (:files @local))
+    (dom/show! (dom/by-id "drop-msg"))))
+
+(defn remove-all-files
+  [state local])
+
+(defn remove-file*
+  [local id]
   (fn [e]
     (.preventDefault e)
-    (swap! local update-in [:files] dissoc id)
-    (dom/remove! (dom/by-id id))
-    (when (empty? (:files @local))
-      (dom/show! (dom/by-id "drop-msg")))))
+    (remove-file local id)))
 
 (defn add-files
   [state local]

              (dom/create-dom!
               [:div.row {:id id}
                [:div.col-xs-1
                 [:button.close {:type "button" :events [[:click (remove-file local id)]]} "\u00D7"]]
                [:div.col-xs-5 fname]
                [:div.col-xs-2 (ff/format [KB "KB"] fsize)]
                [:div.col-xs-4

   :method  :get
   :edn?    true
   :success (fn [status body]
              (let [graph (trio/as-model (:body body))
                    title (-> graph (trio/select (:id @local) "dct:title" nil) (first) (peek))
                    owner (-> graph (trio/select (:id @local) "dct:creator" nil) (first) (peek))
                    items (q/query {:select :* :from graph
                                    :query [{:where '[[?img "dct:hasVersion" ?thumb]
                                                      [?img "dct:hasVersion" ?xl]
                                                      [?thumb "dct:references"
                                                       "617e6192-d1a3-4422-b3cc-d7fcfb782de5"]
                                                      [?xl "dct:references"
                                                       "fd9e54e5-3700-4736-ba32-a1bae45cf0b3"]]}]})]
                (swap!
                 local assoc
                 :title title
                 :owner owner
                 :items items
                 :graph graph)
                (show-template state local)))
   :error   (fn [status body]
              (warn :error-response status body)
              (async/publish (:bus @state) :load-coll-fail (:body body)))))

(defn init
  [bus]
