 ;;                (is (= innerHTML "<div>Inner HTML</div>"))
 ;;                (is (= tagName "DIV")))))
 
-;; (deftest test-screenshot
-;;   (with-tmp-file "screenshot" ".png" path
-;;     (screenshot path)
-;;     (-> path
-;;         io/file
-;;         ImageIO/read
-;;         is)))
+(deftest test-screenshot
+  (with-tmp-file "screenshot" ".png" path
+    (screenshot *driver* path)
+    (-> path
+        io/file
+        ImageIO/read
+        is)))
 
 ;; (deftest test-js-execute
 ;;   (testing "simple result"

            [etaoin.api :refer :all])
  (:import javax.imageio.ImageIO))

;; (defmacro with-tmp-file [prefix suffix bind & body]
;;   `(let [tmp# (java.io.File/createTempFile ~prefix ~suffix)
;;          ~bind (.getAbsolutePath tmp#)]
;;      (try
;;        ~@body
;;        (finally
;;          (.delete tmp#)))))

(defn numeric? [val]
  (or (instance? Double val)

          (= "active-el-input")
          is))))

(deftest test-element-text
  (let [text (get-element-text *driver* {:id :element-text})]
    (is (= text "Element text goes here."))))

;; (deftest test-cookies
;;   (testing "getting all cookies"
