7 use Test::More tests => 1 + 1; # plus one for warnings check
10 my $shredder_utils = RT::Test::get_relocatable_file('utils.pl',
11 File::Spec->curdir());
12 require $shredder_utils;
17 create_savepoint('clean'); # backup of the clean RT DB
18 my $shredder = shredder_new(); # new shredder object
21 # create and wipe RT objects
24 cmp_deeply( dump_current_and_savepoint('clean'), "current DB equal to savepoint");