r9090@llin: dpavlin | 2005-11-24 12:48:47 +0100

 fix

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@126 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/t/7-est.t b/t/7-est.t
index 7b52ce4..9b74cea 100755 (executable)
--- a/t/7-est.t
+++ b/t/7-est.t
@@ -23,15 +23,16 @@ ok(my $est = new WebPAC::Search::Estraier(
        passwd => 'admin',
        encoding => 'iso-8859-2',
        log => $log,
+       debug => 1,
 ), "new");
 
 my $query = 'ivan';
-my $max = 10;
+my $max = 3;
 
 ok(my @res = $est->search(
-       query => $query,
+       phrase => $query,
+       get_attr => [ qw/PersonalName TitleProper/ ],
        max => $max,
-       attr => [ qw/PersonalName TitleProper/ ],
 ), "search $query, max: $max");
 
 cmp_ok(($#res + 1), '==', $max, "$max hits");