Blame lenses/tests/test_activemq_conf.aug
|
Packit Service |
a2ae7a |
(*
|
|
Packit Service |
a2ae7a |
Module: Test_ActiveMQ_Conf
|
|
Packit Service |
a2ae7a |
Provides unit tests and examples for the <ActiveMQ_Conf> lens.
|
|
Packit Service |
a2ae7a |
*)
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
module Test_ActiveMQ_Conf =
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
(* Variable: conf *)
|
|
Packit Service |
a2ae7a |
let conf = "
|
|
Packit Service |
a2ae7a |
ACTIVEMQ_HOME=/usr/share/activemq
|
|
Packit Service |
a2ae7a |
ACTIVEMQ_BASE=${ACTIVEMQ_HOME}
|
|
Packit Service |
a2ae7a |
"
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
(* Variable: new_conf *)
|
|
Packit Service |
a2ae7a |
let new_conf = "
|
|
Packit Service |
a2ae7a |
ACTIVEMQ_HOME=/usr/local/share/activemq
|
|
Packit Service |
a2ae7a |
ACTIVEMQ_BASE=${ACTIVEMQ_HOME}
|
|
Packit Service |
a2ae7a |
"
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let lns = ActiveMQ_Conf.lns
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
(* Test: ActiveMQ_Conf.lns
|
|
Packit Service |
a2ae7a |
* Get test against tree structure
|
|
Packit Service |
a2ae7a |
*)
|
|
Packit Service |
a2ae7a |
test lns get conf =
|
|
Packit Service |
a2ae7a |
{ }
|
|
Packit Service |
a2ae7a |
{ "ACTIVEMQ_HOME" = "/usr/share/activemq" }
|
|
Packit Service |
a2ae7a |
{ "ACTIVEMQ_BASE" = "${ACTIVEMQ_HOME}" }
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
(* Test: ActiveMQ_Conf.lns
|
|
Packit Service |
a2ae7a |
* Put test changing user to nobody
|
|
Packit Service |
a2ae7a |
*)
|
|
Packit Service |
a2ae7a |
test lns put conf after set "/ACTIVEMQ_HOME" "/usr/local/share/activemq" = new_conf
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
(* vim: set ts=4 expandtab sw=4: *)
|