3 |
use strict; |
use strict; |
4 |
use blib; |
use blib; |
5 |
|
|
6 |
use Test::More tests => 88; |
use Test::More tests => 90; |
7 |
use Test::Exception; |
use Test::Exception; |
8 |
use Data::Dumper; |
use Data::Dumper; |
9 |
|
|
111 |
ok($v = $node->word_num, "word_num: $v"); |
ok($v = $node->word_num, "word_num: $v"); |
112 |
ok($v = $node->size, "size: $v"); |
ok($v = $node->size, "size: $v"); |
113 |
|
|
114 |
|
ok($node->set_snippet_width( 100, 10, 10 ), "set_snippet_width"); |
115 |
|
|
116 |
|
# user doesn't exist |
117 |
|
ok(! $node->set_user('foobar', 1), 'set_user'); |
118 |
|
|
119 |
|
diag "over"; |