2 Module: Test_ActiveMQ_XML
3 Provides unit tests and examples for the <ActiveMQ_XML> lens.
6 module Test_ActiveMQ_XML =
10 <broker xmlns=\"http://activemq.apache.org/schema/core\" brokerName=\"localhost\" dataDirectory=\"${activemq.data}\">
12 <transportConnector name=\"openwire\" uri=\"tcp://0.0.0.0:61616\"/>
13 </transportConnectors>
18 (* Variable: new_conf *)
19 let new_conf = "<beans>
20 <broker xmlns=\"http://activemq.apache.org/schema/core\" brokerName=\"localhost\" dataDirectory=\"${activemq.data}\">
22 <transportConnector name=\"openwire\" uri=\"tcp://127.0.0.1:61616\"/>
23 </transportConnectors>
28 let lns = ActiveMQ_XML.lns
30 (* Test: ActiveMQ_XML.lns
31 * Get test against tree structure
39 { "xmlns" = "http://activemq.apache.org/schema/core" }
40 { "brokerName" = "localhost" }
41 { "dataDirectory" = "${activemq.data}" }
45 { "transportConnectors"
48 { "transportConnector" = "#empty"
50 { "name" = "openwire" }
51 { "uri" = "tcp://0.0.0.0:61616" }
60 (* Test: ActiveMQ_XML.lns
61 * Put test changing transport connector to localhost
63 test lns put conf after set "/beans/broker/transportConnectors/transportConnector/#attribute/uri" "tcp://127.0.0.1:61616" = new_conf
65 (* vim: set ts=4 expandtab sw=4: *)