From 947204e8ef5bf83bb8bb3a469ef4a74bdcbe2be9 Mon Sep 17 00:00:00 2001
From: Joey Yakimowich-Payne <jyapayne@gmail.com>
Date: Mon, 23 Jul 2018 09:52:16 +0900
Subject: [PATCH] Add clear command

---
 src/webdriver.nim | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/src/webdriver.nim b/src/webdriver.nim
index b164ca2..d3f76ff 100644
--- a/src/webdriver.nim
+++ b/src/webdriver.nim
@@ -114,6 +114,17 @@ proc getText*(self: Element): string =
 
   return respObj["value"].getStr()
 
+proc clear*(self: Element) =
+  ## Clears an element of text/input
+  let reqUrl = $(self.session.driver.url / "session" / self.session.id /
+                 "element" / self.id / "clear")
+  let obj = %*{}
+  let resp = self.session.driver.client.post(reqUrl, $obj)
+  if resp.status != Http200:
+    raise newException(WebDriverException, resp.status)
+
+  discard checkResponse(resp.body)
+
 proc click*(self: Element) =
   let reqUrl = $(self.session.driver.url / "session" / self.session.id / 
                  "element" / self.id / "click")