16 use Test
::Class
::Load qw
( . ); # run from the t directory
18 KohaTest
::clear_test_database
();
19 KohaTest
::create_test_database
();
21 KohaTest
::start_zebrasrv
();
22 KohaTest
::start_zebraqueue_daemon
();
24 if ($ENV{'TEST_CLASS'}) {
25 # assume only one test class is specified;
26 # should extend to allow multiples, but that will
27 # mean changing how test classes are loaded.
28 eval "KohaTest::$ENV{'TEST_CLASS'}->runtests";
30 Test
::Class
->runtests;
33 KohaTest
::stop_zebraqueue_daemon
();
34 KohaTest
::stop_zebrasrv
();