diff --git a/src/Web/HTML/HTMLImageElement.js b/src/Web/HTML/HTMLImageElement.js
index 7687e2c..ef9c36b 100644
--- a/src/Web/HTML/HTMLImageElement.js
+++ b/src/Web/HTML/HTMLImageElement.js
@@ -7,7 +7,7 @@ exports.create = function () {
};
};
-exports["create'"] = function (width) {
+exports.createWithDimensions = function (width) {
return function (height) {
return function () {
return new Image(width, height);
diff --git a/src/Web/HTML/HTMLImageElement.purs b/src/Web/HTML/HTMLImageElement.purs
index d313223..1b330d2 100644
--- a/src/Web/HTML/HTMLImageElement.purs
+++ b/src/Web/HTML/HTMLImageElement.purs
@@ -1,4 +1,39 @@
-module Web.HTML.HTMLImageElement where
+module Web.HTML.HTMLImageElement
+ ( HTMLImageElement
+ , fromHTMLElement
+ , fromElement
+ , fromNode
+ , fromChildNode
+ , fromNonDocumentTypeChildNode
+ , fromParentNode
+ , fromEventTarget
+ , toHTMLElement
+ , toElement
+ , toNode
+ , toChildNode
+ , toNonDocumentTypeChildNode
+ , toParentNode
+ , toEventTarget
+ , create
+ , create'
+ , alt
+ , setAlt
+ , src
+ , setSrc
+ , crossOrigin
+ , setCrossOrigin
+ , useMap
+ , setUseMap
+ , isMap
+ , setIsMap
+ , width
+ , setWidth
+ , height
+ , setHeight
+ , naturalWidth
+ , naturalHeight
+ , complete
+ ) where
import Data.Maybe (Maybe)
import Effect (Effect)
@@ -55,7 +90,10 @@ toEventTarget = unsafeCoerce
foreign import create :: Unit -> Effect HTMLImageElement
-foreign import create' :: Int -> Int -> Effect HTMLImageElement
+foreign import createWithDimensions :: Int -> Int -> Effect HTMLImageElement
+
+create' :: Int -> Int -> Effect HTMLImageElement
+create' = createWithDimensions
foreign import alt :: HTMLImageElement -> Effect String
foreign import setAlt :: String -> HTMLImageElement -> Effect Unit
diff --git a/src/Web/HTML/HTMLInputElement.js b/src/Web/HTML/HTMLInputElement.js
index 2dfe66e..f2aa040 100644
--- a/src/Web/HTML/HTMLInputElement.js
+++ b/src/Web/HTML/HTMLInputElement.js
@@ -568,7 +568,7 @@ exports.setWidth = function (width) {
// ----------------------------------------------------------------------------
-exports["stepUp'"] = function (n) {
+exports.stepUpBy = function (n) {
return function (input) {
return function () {
input.stepUp(n);
@@ -578,7 +578,7 @@ exports["stepUp'"] = function (n) {
// ----------------------------------------------------------------------------
-exports["stepDown'"] = function (n) {
+exports.stepDownBy = function (n) {
return function (input) {
return function () {
input.stepDown(n);
diff --git a/src/Web/HTML/HTMLInputElement.purs b/src/Web/HTML/HTMLInputElement.purs
index 3f36ed3..cb55615 100644
--- a/src/Web/HTML/HTMLInputElement.purs
+++ b/src/Web/HTML/HTMLInputElement.purs
@@ -290,12 +290,18 @@ foreign import setWidth :: Int -> HTMLInputElement -> Effect Unit
stepUp :: HTMLInputElement -> Effect Unit
stepUp = stepUp' 1
-foreign import stepUp' :: Int -> HTMLInputElement -> Effect Unit
+foreign import stepUpBy :: Int -> HTMLInputElement -> Effect Unit
+
+stepUp' :: Int -> HTMLInputElement -> Effect Unit
+stepUp' = stepUpBy
stepDown :: HTMLInputElement -> Effect Unit
stepDown = stepDown' 1
-foreign import stepDown' :: Int -> HTMLInputElement -> Effect Unit
+foreign import stepDownBy :: Int -> HTMLInputElement -> Effect Unit
+
+stepDown' :: Int -> HTMLInputElement -> Effect Unit
+stepDown' = stepDownBy
foreign import willValidate :: HTMLInputElement -> Effect Boolean
diff --git a/src/Web/HTML/HTMLTableElement.js b/src/Web/HTML/HTMLTableElement.js
index 9fae7fa..9fc1fc7 100644
--- a/src/Web/HTML/HTMLTableElement.js
+++ b/src/Web/HTML/HTMLTableElement.js
@@ -120,7 +120,7 @@ exports.rows = function (table) {
// ----------------------------------------------------------------------------
-exports["insertRow'"] = function (index) {
+exports.insertRowAt = function (index) {
return function (table) {
return function () {
return table.insertRow(index);
diff --git a/src/Web/HTML/HTMLTableElement.purs b/src/Web/HTML/HTMLTableElement.purs
index 275fbb0..da7bfa5 100644
--- a/src/Web/HTML/HTMLTableElement.purs
+++ b/src/Web/HTML/HTMLTableElement.purs
@@ -138,7 +138,10 @@ foreign import rows :: HTMLTableElement -> Effect HTMLCollection
insertRow :: HTMLTableElement -> Effect HTMLElement
insertRow = insertRow' (-1)
-foreign import insertRow' :: Int -> HTMLTableElement -> Effect HTMLElement
+foreign import insertRowAt :: Int -> HTMLTableElement -> Effect HTMLElement
+
+insertRow' :: Int -> HTMLTableElement -> Effect HTMLElement
+insertRow' = insertRowAt
foreign import deleteRow :: Int -> HTMLTableElement -> Effect Unit
diff --git a/src/Web/HTML/HTMLTableRowElement.js b/src/Web/HTML/HTMLTableRowElement.js
index 82c5c17..775169d 100644
--- a/src/Web/HTML/HTMLTableRowElement.js
+++ b/src/Web/HTML/HTMLTableRowElement.js
@@ -32,7 +32,7 @@ exports.cells = function (row) {
// ----------------------------------------------------------------------------
-exports["insertCell'"] = function (index) {
+exports.insertCellAt = function (index) {
return function (row) {
return function () {
return row.insertCell(index);
diff --git a/src/Web/HTML/HTMLTableRowElement.purs b/src/Web/HTML/HTMLTableRowElement.purs
index ed043c6..4976b42 100644
--- a/src/Web/HTML/HTMLTableRowElement.purs
+++ b/src/Web/HTML/HTMLTableRowElement.purs
@@ -1,4 +1,26 @@
-module Web.HTML.HTMLTableRowElement where
+module Web.HTML.HTMLTableRowElement
+ ( HTMLTableRowElement
+ , fromHTMLElement
+ , fromElement
+ , fromNode
+ , fromChildNode
+ , fromNonDocumentTypeChildNode
+ , fromParentNode
+ , fromEventTarget
+ , toHTMLElement
+ , toElement
+ , toNode
+ , toChildNode
+ , toNonDocumentTypeChildNode
+ , toParentNode
+ , toEventTarget
+ , rowIndex
+ , sectionRowIndex
+ , cells
+ , insertCell
+ , insertCell'
+ , deleteCell
+ ) where
import Data.Maybe (Maybe)
import Effect (Effect)
@@ -63,6 +85,9 @@ foreign import cells :: HTMLTableRowElement -> Effect HTMLCollection
insertCell :: HTMLTableRowElement -> Effect HTMLElement
insertCell = insertCell' (-1)
-foreign import insertCell' :: Int -> HTMLTableRowElement -> Effect HTMLElement
+foreign import insertCellAt :: Int -> HTMLTableRowElement -> Effect HTMLElement
+
+insertCell' :: Int -> HTMLTableRowElement -> Effect HTMLElement
+insertCell' = insertCellAt
foreign import deleteCell :: Int -> HTMLTableRowElement -> Effect Unit
diff --git a/src/Web/HTML/HTMLTableSectionElement.js b/src/Web/HTML/HTMLTableSectionElement.js
index 527eb46..f571cc2 100644
--- a/src/Web/HTML/HTMLTableSectionElement.js
+++ b/src/Web/HTML/HTMLTableSectionElement.js
@@ -8,7 +8,7 @@ exports.rows = function (section) {
// ----------------------------------------------------------------------------
-exports["insertRow'"] = function (index) {
+exports.insertRowAt = function (index) {
return function (section) {
return function () {
return section.insertRow(index);
diff --git a/src/Web/HTML/HTMLTableSectionElement.purs b/src/Web/HTML/HTMLTableSectionElement.purs
index 6846ac5..4a24fef 100644
--- a/src/Web/HTML/HTMLTableSectionElement.purs
+++ b/src/Web/HTML/HTMLTableSectionElement.purs
@@ -1,4 +1,24 @@
-module Web.HTML.HTMLTableSectionElement where
+module Web.HTML.HTMLTableSectionElement
+ ( HTMLTableSectionElement
+ , fromHTMLElement
+ , fromElement
+ , fromNode
+ , fromChildNode
+ , fromNonDocumentTypeChildNode
+ , fromParentNode
+ , fromEventTarget
+ , toHTMLElement
+ , toElement
+ , toNode
+ , toChildNode
+ , toNonDocumentTypeChildNode
+ , toParentNode
+ , toEventTarget
+ , rows
+ , insertRow
+ , insertRow'
+ , deleteRow
+ ) where
import Prelude
@@ -60,6 +80,9 @@ foreign import rows :: HTMLTableSectionElement -> Effect HTMLCollection
insertRow :: HTMLTableSectionElement -> Effect HTMLElement
insertRow = insertRow' (-1)
-foreign import insertRow' :: Int -> HTMLTableSectionElement -> Effect HTMLElement
+foreign import insertRowAt :: Int -> HTMLTableSectionElement -> Effect HTMLElement
+
+insertRow' :: Int -> HTMLTableSectionElement -> Effect HTMLElement
+insertRow' = insertRowAt
foreign import deleteRow :: Int -> HTMLTableSectionElement -> Effect Unit