   (let [db-pool (-> sys :db-pool :pool)]
     (compojure/routes
       ;; Delete sample posts
-      (ANY "/orgs/:org-slug/entries/samples"
+      (OPTIONS "/orgs/:org-slug/entries/samples"
         [org-slug]
         (pool/with-pool [conn db-pool]
           (entry-list conn org-slug nil)))
-      (ANY "/orgs/:org-slug/entries/samples/"
+      (OPTIONS "/orgs/:org-slug/entries/samples/"
+        [org-slug]
+        (pool/with-pool [conn db-pool]
+          (entry-list conn org-slug nil)))
+      (DELETE "/orgs/:org-slug/entries/samples"
+        [org-slug]
+        (pool/with-pool [conn db-pool]
+          (entry-list conn org-slug nil)))
+      (DELETE "/orgs/:org-slug/entries/samples/"
         [org-slug]
         (pool/with-pool [conn db-pool]
           (entry-list conn org-slug nil)))

  ;; Existentialism
  :exists? (by-method {
    :options true
    :post (partial entry-list-exists-with-board conn org-slug board-slug-or-uuid)
    :get (partial entry-list-exists-with-board conn org-slug board-slug-or-uuid)
    :delete (fn [ctx]
              (if-let* [_slugs? (slugify/valid-slug? org-slug)
                        org (or (:existing-org ctx)

  :handle-unprocessable-entity (fn [ctx]
    (api-common/unprocessable-entity-response (schema/check common-res/Entry (:updated-entry ctx)))))

;; A resource for operations on all entries of a particular board
(defresource entry-list [conn org-slug board-slug-or-uuid]
  (api-common/open-company-anonymous-resource config/passphrase) ; verify validity of optional JWToken
