Node child manipulations return unit (#32)

Author: robertdp

src/Web/DOM/Node.js

@@ -130,7 +130,7 @@ exports.insertBefore = function (node1) {
   return function (node2) {
     return function (parent) {
       return function () {
-        return parent.insertBefore(node1, node2);
+        parent.insertBefore(node1, node2);
       };
     };
   };
@@ -139,7 +139,7 @@ exports.insertBefore = function (node1) {
 exports.appendChild = function (node) {
   return function (parent) {
     return function () {
-      return parent.appendChild(node);
+      parent.appendChild(node);
     };
   };
 };
@@ -148,7 +148,7 @@ exports.replaceChild = function (newChild) {
   return function (oldChild) {
     return function (parent) {
       return function () {
-        return parent.replaceChild(newChild, oldChild);
+        parent.replaceChild(newChild, oldChild);
       };
     };
   };
@@ -157,7 +157,7 @@ exports.replaceChild = function (newChild) {
 exports.removeChild = function (node) {
   return function (parent) {
     return function () {
-      return parent.removeChild(node);
+      parent.removeChild(node);
     };
   };
 };

src/Web/DOM/Node.purs

@@ -176,14 +176,14 @@ foreign import _lookupNamespaceURI :: String -> Node -> Effect (Nullable String)
 foreign import isDefaultNamespace :: String -> Node -> Effect Boolean
 
 -- | Inserts the first node before the second as a child of the third node.
-foreign import insertBefore :: Node -> Node -> Node -> Effect Node
+foreign import insertBefore :: Node -> Node -> Node -> Effect Unit
 
 -- | Appends the first node to the child node list of the second node.
-foreign import appendChild :: Node -> Node -> Effect Node
+foreign import appendChild :: Node -> Node -> Effect Unit
 
 -- | Uses the first node as a replacement for the second node in the children
 -- | of the third node.
-foreign import replaceChild :: Node -> Node -> Node -> Effect Node
+foreign import replaceChild :: Node -> Node -> Node -> Effect Unit
 
 -- | Removes the first node from the children of the second node.
-foreign import removeChild :: Node -> Node -> Effect Node
+foreign import removeChild :: Node -> Node -> Effect Unit