/[Search-Estraier]/trunk/t/1_Document.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/t/1_Document.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 184 by dpavlin, Sun Aug 6 12:48:02 2006 UTC revision 185 by dpavlin, Sun Nov 5 15:53:01 2006 UTC
# Line 3  Line 3 
3  use strict;  use strict;
4  use blib;  use blib;
5    
6  use Test::More tests => 55;  use Test::More tests => 60;
7  use Test::Exception;  use Test::Exception;
8  use Data::Dumper;  use Data::Dumper;
9    
# Line 110  ok(! $doc->attr_names, 'attr_names'); Line 110  ok(! $doc->attr_names, 'attr_names');
110  ok(! $doc->attr(undef), 'attr');  ok(! $doc->attr(undef), 'attr');
111  ok(! $doc->cat_texts, 'cat_texts');  ok(! $doc->cat_texts, 'cat_texts');
112    
113    ok($doc = new Search::Estraier::Document, 'new empty');
114    cmp_ok($doc->score, '==', -1, 'no score');
115    ok($doc->set_score(12345), 'set_score');
116    cmp_ok($doc->score, '==', 12345, 'score');
117    like($doc->dump_draft, qr/%SCORE\s+12345/, 'dump_draft has %SCORE');
118    
Legend:
Removed from v.184  
changed lines
  Added in v.185
  ViewVC Help
Powered by ViewVC 1.1.26