rt/t/api/initialdata.t

   1 use strict;
   2 use warnings;
   3
   4 use RT::Test tests => 'no_declare';
   5
   6 # This test script processes the sample initialdata file in
   7 # ../data/initialdata/initialdata
   8 # To add initialdata tests, add the data to the initialdata file and it
   9 # will be processed by this script.
  10
  11 my $initialdata = RT::Test::get_relocatable_file("initialdata" => "..", "data", "initialdata");
  12 my ($rv, $msg) = RT->DatabaseHandle->InsertData( $initialdata, undef, disconnect_after => 0 );
  13 ok($rv, "Inserted test data from $initialdata")
  14     or diag "Error: $msg";
  15
  16 done_testing();