xowf::test_item::Answer_manager method dom node replaceXML (protected)

 <instance of xowf::test_item::Answer_manager> dom node replaceXML \
    domNode xquery XML

Defined in packages/xowf/tcl/test-item-procs.tcl

Parameters:

domNode
xquery
XML

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

set node [$domNode selectNodes $xquery]
if {$node ne ""} {
  foreach child [$node childNodes] {
    $child delete
  }
  #
  # There is in tDOM only an appendXML and no appendHTML. If the
  # replace-text is an <img>" XML-parse fails since there is no
  # ending tag. So, we use the following heuristic. Note that
  # this does not happen in full installations, where icon sets
  # are available, but it might show up in a native regression
  # test with minimal packages.
  #
  if {[string match "<img*" $XML]} {
    append XML </img>
  }
  :uplevel [list $node appendXML $XML]
}

XQL Not present:

Generic, PostgreSQL, Oracle