move function around to make more obvious goes with getDomNode, add missing return type for getDomNode

Author: PerditionC

src/AutomateBrowser.cls

@@ -762,10 +762,9 @@ Public Function getNodeIdOrName(ByVal node As cdpDOMNode) As String
     getNodeIdOrName = idOrName
 End Function
 
-
 ' takes a nodeId or backendNodeId (or RemoteObject.objectId) and returns cdpDOMNode object
 Public Function getDomNode(Optional ByVal nodeId As Integer = 0, Optional ByVal backendNodeId As Integer = 0, Optional ByVal objectId As String = vbNullString, _
-                           Optional ByVal depth As Integer = -1, Optional ByVal pierce As Boolean = False)
+                           Optional ByVal depth As Integer = -1, Optional ByVal pierce As Boolean = False) As cdpDOMNode
     Dim dict As Dictionary
     If objectId <> vbNullString Then
         Set dict = cdp.DOM.describeNode(objectId:=objectId, depth:=depth, pierce:=pierce)
@@ -782,6 +781,11 @@ Public Function getDomNode(Optional ByVal nodeId As Integer = 0, Optional ByVal
     End If
 End Function
 
+' converts a Runtime.RemoteObject into a DOM.Node
+Public Function RemoteObjectToDomNode(ByVal remoteObj As cdpRuntimeRemoteObject, Optional ByVal depth As Integer = -1, Optional ByVal pierce As Boolean = False) As cdpDOMNode
+    Set RemoteObjectToDomNode = getDomNode(objectId:=remoteObj.objectId, depth:=depth, pierce:=pierce)
+End Function
+
 ' takes a Collection of nodeIds and returns a Dictionary of cdpDomNode objetcs
 ' Note: resulting dictionary is keyed on id if node has one, else name if has one, else a unique numerical value
 Public Function getDomNodes(Optional ByVal nodeIds As Collection, Optional ByVal backendNodeIds As Collection, Optional objectIds As Collection, Optional ByVal remoteNodeList As cdpRuntimeRemoteObject, _
@@ -844,11 +848,6 @@ Public Function getDomNodes(Optional ByVal nodeIds As Collection, Optional ByVal
     Set getDomNodes = nodes
 End Function
 
-' converts a Runtime.RemoteObject into a DOM.Node
-Public Function RemoteObjectToDomNode(ByVal remoteObj As cdpRuntimeRemoteObject, Optional ByVal depth As Integer = -1, Optional ByVal pierce As Boolean = False) As cdpDOMNode
-    Set RemoteObjectToDomNode = getDomNode(objectId:=remoteObj.objectId, depth:=depth, pierce:=pierce)
-End Function
-
 ' internally to support getting elements in iframes, we have to run
 ' javascript relative to the frame, for nonframe elements we can just call cdp.DOM.querySelector
 ' This compiles a javascript function that does that.