Merge pull request #12 from bosyi/master

Fixed checkValidity, added reportValidity

Author: garyb

src/Web/HTML/HTMLButtonElement.js

@@ -194,7 +194,15 @@ exports.validationMessage = function (button) {
 
 exports.checkValidity = function (button) {
   return function () {
-    return button.checkValidity;
+    return button.checkValidity();
+  };
+};
+
+// ----------------------------------------------------------------------------
+
+exports.reportValidity = function (button) {
+  return function () {
+    return button.reportValidity();
   };
 };
 

src/Web/HTML/HTMLButtonElement.purs

@@ -39,6 +39,7 @@ module Web.HTML.HTMLButtonElement
   , validity
   , validationMessage
   , checkValidity
+  , reportValidity
   , setCustomValidity
   , labels
   ) where
@@ -144,6 +145,8 @@ foreign import validationMessage :: HTMLButtonElement -> Effect String
 
 foreign import checkValidity :: HTMLButtonElement -> Effect Boolean
 
+foreign import reportValidity :: HTMLButtonElement -> Effect Boolean
+
 foreign import setCustomValidity :: String -> HTMLButtonElement -> Effect Unit
 
 foreign import labels :: HTMLButtonElement -> Effect NodeList

src/Web/HTML/HTMLFieldSetElement.js

@@ -82,7 +82,15 @@ exports.validationMessage = function (fieldset) {
 
 exports.checkValidity = function (fieldset) {
   return function () {
-    return fieldset.checkValidity;
+    return fieldset.checkValidity();
+  };
+};
+
+// ----------------------------------------------------------------------------
+
+exports.reportValidity = function (fieldset) {
+  return function () {
+    return fieldset.reportValidity();
   };
 };
 

src/Web/HTML/HTMLFieldSetElement.purs

@@ -25,6 +25,7 @@ module Web.HTML.HTMLFieldSetElement
   , validity
   , validationMessage
   , checkValidity
+  , reportValidity
   , setCustomValidity
   ) where
 
@@ -109,4 +110,6 @@ foreign import validationMessage :: HTMLFieldSetElement -> Effect String
 
 foreign import checkValidity :: HTMLFieldSetElement -> Effect Boolean
 
+foreign import reportValidity :: HTMLFieldSetElement -> Effect Boolean
+
 foreign import setCustomValidity :: String -> HTMLFieldSetElement -> Effect Unit

src/Web/HTML/HTMLFormElement.js

@@ -173,3 +173,11 @@ exports.checkValidity = function (form) {
     return form.checkValidity();
   };
 };
+
+// ----------------------------------------------------------------------------
+
+exports.reportValidity = function (form) {
+  return function () {
+    return form.reportValidity();
+  };
+};

src/Web/HTML/HTMLFormElement.purs

@@ -90,3 +90,4 @@ foreign import length :: HTMLFormElement -> Effect Int
 foreign import submit :: HTMLFormElement -> Effect Unit
 foreign import reset :: HTMLFormElement -> Effect Unit
 foreign import checkValidity :: HTMLFormElement -> Effect Boolean
+foreign import reportValidity :: HTMLFormElement -> Effect Boolean

src/Web/HTML/HTMLInputElement.js

@@ -614,7 +614,15 @@ exports.validationMessage = function (input) {
 
 exports.checkValidity = function (input) {
   return function () {
-    return input.checkValidity;
+    return input.checkValidity();
+  };
+};
+
+// ----------------------------------------------------------------------------
+
+exports.reportValidity = function (input) {
+  return function () {
+    return input.reportValidity();
   };
 };
 

src/Web/HTML/HTMLInputElement.purs

@@ -91,6 +91,7 @@ module Web.HTML.HTMLInputElement
   , validity
   , validationMessage
   , checkValidity
+  , reportValidity
   , setCustomValidity
   , labels
   , select
@@ -304,6 +305,8 @@ foreign import validationMessage :: HTMLInputElement -> Effect String
 
 foreign import checkValidity :: HTMLInputElement -> Effect Boolean
 
+foreign import reportValidity :: HTMLInputElement -> Effect Boolean
+
 foreign import setCustomValidity :: String -> HTMLInputElement -> Effect Unit
 
 foreign import labels :: HTMLInputElement -> Effect NodeList

src/Web/HTML/HTMLKeygenElement.js

@@ -122,7 +122,15 @@ exports.validationMessage = function (keygen) {
 
 exports.checkValidity = function (keygen) {
   return function () {
-    return keygen.checkValidity;
+    return keygen.checkValidity();
+  };
+};
+
+// ----------------------------------------------------------------------------
+
+exports.reportValidity = function (keygen) {
+  return function () {
+    return keygen.reportValidity();
   };
 };
 

src/Web/HTML/HTMLKeygenElement.purs

@@ -30,6 +30,7 @@ module Web.HTML.HTMLKeygenElement
   , validity
   , validationMessage
   , checkValidity
+  , reportValidity
   , setCustomValidity
   , labels
   ) where
@@ -123,6 +124,8 @@ foreign import validationMessage :: HTMLKeygenElement -> Effect String
 
 foreign import checkValidity :: HTMLKeygenElement -> Effect Boolean
 
+foreign import reportValidity :: HTMLKeygenElement -> Effect Boolean
+
 foreign import setCustomValidity :: String -> HTMLKeygenElement -> Effect Unit
 
 foreign import labels :: HTMLKeygenElement -> Effect NodeList