        :headers {"host" "t1.lumen.local:3030" "content-type" "application/json"}
        :uri uri}
     query-params (assoc :query-params query-params)))
+
+(defn get* [uri & more]
+  (>get* :get uri more))
+
+(defn del* [uri & more]
+  (>get* :delete uri more))
 
 (defn job-execution-dataset-id [h job-id]
   (dh/with-retry {:retry-if (fn [v e] (not v))

                          :body (json/parse-string keyword) :id))))

          (is (= title* (-> (h (get* (api-url "/library")))
                           :body (json/parse-string keyword) :collections first :title)))
          ))
      (testing "/datasets"
        (let [title "dataset-title"

                :sentryDSN "dev-sentry-client-dsn"}
               (json/parse-string (:body r) keyword)))))
    (testing "/api"
      (testing "/admin/users"
        (let [users (-> (h (get* (api-url "/admin/users"))) body-kw :users)]
          (is (= '("jerome@t1.lumen.localhost" "salim@t1.lumen.localhost")
                 (sort (map :email users))))))
      
      (let [r (h (get* (api-url "/library")))]
        (is (= 200 (:status r)))
        (is (= {:dashboards []
