use file from $marc_file variable

git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/MARC-Fast/trunk@38 49f9634a-d7ec-0310-8e6b-ec35c6cc8804

diff --git a/t/002_marc-utf8.t b/t/002_marc-utf8.t
index fd50291..2887cc4 100755 (executable)
--- a/t/002_marc-utf8.t
+++ b/t/002_marc-utf8.t
@@ -16,7 +16,7 @@ my $debug = shift @ARGV;
 my $marc_file = 't/utf8.marc';
 
 ok(my $marc = MARC::Fast->new(
 my $marc_file = 't/utf8.marc';
 
 ok(my $marc = MARC::Fast->new(

-       marcdb => 't/utf8.marc',
+       marcdb => $marc_file,

        hash_filter => sub {
                Encode::decode( 'utf-8', $_[0] );
        },
        hash_filter => sub {
                Encode::decode( 'utf-8', $_[0] );
        },