 (def tenant-host "http://t1.lumen.local:3030")
 
 (defn api-url [api-url & args]
-  (str  "/api" api-url (when args (str "/" (apply str args)))))
+  (str  "/api" api-url (when args (str "/" (str/join "/"  args)))))
 
 (defn with-body [method uri body & [query-params]]
   (cond->

       :headers {"host" "t1.lumen.local:3030" "content-type" "application/json"}
       :uri uri}
    query-params (assoc :query-params query-params)))

(deftest handler-test
  (let [h (:handler (:akvo.lumen.component.handler/handler *system*))]

                            (json/parse-string keyword)
                            :importId)
              _           (is (some? import-id))
              dataset-id (job-execution-dataset-id h import-id)]
          (let [dataset (-> (h (get* (api-url "/datasets" dataset-id)))
                            :body (json/parse-string keyword))]
            (is (= {:transformations []
                    :columns dataset-link-columns
                    :name title
                    ;;:author nil,
                    :rows
                    [["Bob" 22.0 2.0 4.0 7.0 "A"]
                     ["Jane" 34.0 4.0 8.0 2.0 "B"]
