From dafddbeff09a285d3d561d3c5d6584b599311f58 Mon Sep 17 00:00:00 2001 From: Gary Burgess Date: Sun, 23 Aug 2015 15:45:16 +0100 Subject: [PATCH] Fix NonElementParentNode/NonDocumentTypeChildNode APIs --- src/DOM/Node/NonDocumentTypeChildNode.purs | 9 ++++++--- src/DOM/Node/NonElementParentNode.purs | 8 +++----- 2 files changed, 9 insertions(+), 8 deletions(-) diff --git a/src/DOM/Node/NonDocumentTypeChildNode.purs b/src/DOM/Node/NonDocumentTypeChildNode.purs index cc4d65f..e794e1b 100644 --- a/src/DOM/Node/NonDocumentTypeChildNode.purs +++ b/src/DOM/Node/NonDocumentTypeChildNode.purs @@ -7,6 +7,9 @@ import Data.Nullable (Nullable()) import DOM import DOM.Node.Types --- | The first element within node's descendants with a matching ID, or null if --- | no such element exists. -foreign import getElementById :: forall eff. ElementId -> NonDocumentTypeChildNode -> Eff (dom :: DOM | eff) (Nullable Element) +-- | The previous sibling that is an element, or null if no such element exists. +foreign import previousElementSibling :: forall eff. NonDocumentTypeChildNode -> Eff (dom :: DOM | eff) (Nullable Element) + +-- | The next sibling that is an element, or null if no such element exists. +foreign import nextElementSibling :: forall eff. NonDocumentTypeChildNode -> Eff (dom :: DOM | eff) (Nullable Element) + diff --git a/src/DOM/Node/NonElementParentNode.purs b/src/DOM/Node/NonElementParentNode.purs index 4009b18..aef59a9 100644 --- a/src/DOM/Node/NonElementParentNode.purs +++ b/src/DOM/Node/NonElementParentNode.purs @@ -7,8 +7,6 @@ import Data.Nullable (Nullable()) import DOM import DOM.Node.Types --- | The previous sibling that is an element, or null if no such element exists. -foreign import previousElementSibling :: forall eff. NonElementParentNode -> Eff (dom :: DOM | eff) (Nullable Element) - --- | The next sibling that is an element, or null if no such element exists. -foreign import nextElementSibling :: forall eff. NonElementParentNode -> Eff (dom :: DOM | eff) (Nullable Element) +-- | The first element within node's descendants with a matching ID, or null if +-- | no such element exists. +foreign import getElementById :: forall eff. ElementId -> NonElementParentNode -> Eff (dom :: DOM | eff) (Nullable Element)