--- trunk/t/7-est.t	2005/12/05 17:47:16	212
+++ trunk/t/7-est.t	2005/12/19 21:35:37	302
@@ -2,7 +2,7 @@
 
 use strict;
 
-use Test::More tests => 11;
+use Test::More tests => 12;
 use Test::Exception;
 use Cwd qw/abs_path/;
 use File::Temp qw/tempdir/;
@@ -30,7 +30,7 @@
 
 ok(my $est = new WebPAC::Output::Estraier( %{ $config } ), "new WebPAC::Output::Estraier");
 
-ok(my $list = $est->est_master( action => 'nodelist' ), "nodelist");
+ok(my $list = $est->master( action => 'nodelist' ), "nodelist");
 
 like($list , qr/$config->{database}/, "found $config->{database}");
 
@@ -54,12 +54,12 @@
 
 ok($est->add( id => 42, ds => $ds, type => 'search' ), "add");
 
-ok($est = new WebPAC::Search::Estraier( %{ $config } ), "new WebPAC::Search::Estraier");
+ok(my $est_s = new WebPAC::Search::Estraier( %{ $config } ), "new WebPAC::Search::Estraier");
 
 my $query = 'demo';
 my $max = 1;
 
-ok(my @res = $est->search(
+ok(my @res = $est_s->search(
 	phrase => $query,
 	get_attr => [ qw/ID Source/ ],
 	max => $max,
@@ -69,3 +69,5 @@
 
 diag Dumper(\@res);
 
+ok($est->master( action => 'nodedel', name => 'webpac2test' ), "nodedel");
+