fixes issue with textarea assert

lefthandedgoat · Jun 6, 2013 · 76cea18 · 76cea18
1 parent 767adac
commit 76cea18
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/canopy/canopy.fs b/canopy/canopy.fs
@@ -270,6 +270,8 @@ let private textOf (element : IWebElement) =
     match element.TagName  with
     | "input" ->
         element.GetAttribute("value")
+    | "textarea" ->
+        element.GetAttribute("value")
     | "select" ->
         let value = element.GetAttribute("value")
         let options = Seq.toList (element.FindElements(By.TagName("option")))