 (defn find-element-from-element [element term]
   (api/find-element-from-element *session* element (make-selector term)))
 
-(defn element-value [element text]
-  (api/element-value *session* element text))
-
 (defmacro with-element [term & body]
   `(if (bound? #'*element*)
      (with-bindings {#'*element* (find-element-from-element *element* ~term)}

    (go-url "http://ya.ru")
    (wait 7)
    (with-xpath
      (fill "//input[@id=\"text\"]" "test"))
    (wait 5)
    (is 1)))


  (api/get-url *session*))

(defn fill
  ([text]
   (api/element-value *session* *element* text))
  ([term text]
   (let [element (api/find-element *session* (make-selector term))]
     (api/element-value *session* element text))))

(defn click
  ([]
