Skip to content

X
xml-rpc
Commit 37904742 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- XML-RPC now working more or less

parent 1d55ef54
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 0 deletions
tcl/xml-rpc-procs.tcl
View file @ 37904742
...@@ -591,6 +591,8 @@ ad_proc -private xmlrpc::parse_response {xml} { ...@@ -591,6 +591,8 @@ ad_proc -private xmlrpc::parse_response {xml} {
@param xml the XML response @param xml the XML response
@return result @return result
} { } {
ns_log Notice "xmlrpc::parse_response: xml=$xml"
set doc [xml_parse -persist $xml] set doc [xml_parse -persist $xml]
set root [xml_doc_get_first_node $doc] set root [xml_doc_get_first_node $doc]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment