 (defn clear-el
   "Clears an element by its identifier."
   [driver el]
-  (with-resp driver :post
-    [:session (:session @driver) :element el :clear]
-    nil _))
+  (execute {:driver driver
+            :method :post
+            :path [:session (:session @driver) :element el :clear]}))
 
 (defn clear
   "Clears an element (input, textarea) found with a query.

(defmethod touch-tap
  :chrome
  [driver q]
  (with-resp driver :post
    [:session (:session @driver) :touch :click]
    {:element (query driver q)} _))

(defmulti touch-down dispatch-driver)


(defn get-source
  "Returns browser's current HTML markup as a string."
  [driver]
  (:value (execute {:driver driver
                    :method :get
                    :path [:session (:session @driver) :source]})))

;;
;; Javascript
