     (:value resp)))
 
 (defn get-element-text [driver q]
-  (get-element-text* driver (find driver q)))
+  (get-element-text* driver (query driver q)))
 
 (defn get-element-value* [driver el]
   (with-resp driver :get

(def chrome (partial boot-driver :chrome))
(def phantom (partial boot-driver :phantom))
(def safari (partial boot-driver :safari))

      (wait-key))))

(defn fill-human [driver q text]
  (fill-human* driver (query driver q) text))

;;
;; screenshot
