3 Provides unit tests and examples for the <JMXAccess> lens.
6 module Test_JMXAccess =
13 (* Variable: new_conf *)
14 let new_conf = "# Comment
18 let lns = JMXAccess.lns
20 (* Test: JMXAccess.lns
21 * Get test against tree structure
24 { "#comment" = "Comment" }
26 { "username" = "admin" }
27 { "access" = "readwrite" }
30 (* Test: JMXAccess.lns
31 * Put test changing access to readonly
33 test lns put conf after set "/user/access" "readonly" = new_conf
35 (* vim: set ts=4 expandtab sw=4: *)