r1399@llin: dpavlin | 2007-10-31 11:19:39 +0100
[webpac2] / t / 2-input-dbf.t
index 25728de..4ae1597 100755 (executable)
@@ -15,7 +15,7 @@ use_ok( 'WebPAC::Input' );
 }
 
 ok(my $abs_path = abs_path($0), "abs_path");
-$abs_path =~ s#/[^/]*$#/#;
+$abs_path =~ s#/[^/]*$#/#;     #fix-vim        
 
 my $module = 'WebPAC::Input::DBF';
 diag "testing with $module", $debug ? ' with debug' : '';
@@ -30,9 +30,7 @@ ok(my $input = new WebPAC::Input(
 ok(my $db = $input->open(
        path => "$abs_path/data/cas2000.dbf",
        input_config => {
-               xmapping => [
-                       { 'foobar' => [ '200', 'a' ] },
-               ],
+               mapping_path => "$abs_path/conf/input/dbf/cas2000.yml",
        },
 ), "open");
 ok(my $size = $input->size, "size");