summaryrefslogtreecommitdiff
path: root/rt/t/shredder/utils.pl
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/shredder/utils.pl')
-rw-r--r--rt/t/shredder/utils.pl11
1 files changed, 8 insertions, 3 deletions
diff --git a/rt/t/shredder/utils.pl b/rt/t/shredder/utils.pl
index 7be951370..a3d0cf59a 100644
--- a/rt/t/shredder/utils.pl
+++ b/rt/t/shredder/utils.pl
@@ -8,8 +8,14 @@ require RT::Test;
BEGIN {
### after: push @INC, qw(@RT_LIB_PATH@);
+
+ use RT;
+ RT->LoadConfig;
+ RT->InitPluginPaths;
+ RT->InitClasses;
}
-use RT::Shredder;
+
+require RT::Shredder;
=head1 DESCRIPTION
@@ -282,8 +288,7 @@ sub dump_sqlite
my $old_fhkn = $dbh->{'FetchHashKeyName'};
$dbh->{'FetchHashKeyName'} = 'NAME_lc';
- my $sth = $dbh->table_info( '', '%', '%', 'TABLE' ) || die $DBI::err;
- my @tables = keys %{$sth->fetchall_hashref( 'table_name' )};
+ my @tables = $RT::Handle->_TableNames( $dbh );
my $res = {};
foreach my $t( @tables ) {