                               :line 14 :column 4
                               :name "stuff" :dir (str tmp-dir))
         result (remove keyword? response)]
-    (is (= 3 (count result)) (format "expected 3 results but got %d" (count result)))))
+    (is (= 3 (count result)) (format "expected 3 results but got %d" (count result)))
+    (.delete tmp-dir)))
 
 (deftest test-find-dashed-fn
   (let [tmp-dir (create-test-project)

        transport (connect :port 7777)
        response (find-usages :transport transport :name "a" :file three-file :line 3 :column 24)
        result (remove keyword? response)]
    (is (= 5 (count result)) (format "expected 5 results but got %d" (count result)))))

(deftest find-local-let
  (let [tmp-dir (create-test-project)


    (is (= (find-unbound :transport transport :file five-file :line 34 :column 8)
           '#{name}))
    (.delete tmp-dir)))

(deftest find-unbound-fails-on-cljs
  (let [cljs-file "/tmp/src/com/example/file.cljs"
        transport (connect :port 7777)]
    (is (:error (find-unbound :transport transport :file cljs-file
                              :line 12 :column 6)))))
