the test expect marc-8 records, use database LCDB_MARC8

[ZOOM-Perl-moved-to-github.git] / t / 28-charset.t

diff --git a/t/28-charset.t b/t/28-charset.t
index 11c6cbf..b7e9084 100644 (file)
--- a/t/28-charset.t
+++ b/t/28-charset.t
@@ -7,7 +7,7 @@ use Test::More tests => 9;
 
 BEGIN { use_ok('ZOOM') };
 
-my $host = "lx2.loc.gov:210/LCDB";
+my $host = "lx2.loc.gov:210/LCDB_MARC8";
 my $conn;
 eval { $conn = new ZOOM::Connection($host) };
 ok(!$@, "connection to '$host'");