/[Search-Estraier]/trunk/t/5_Node.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/5_Node.t

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

revision 78 by dpavlin, Mon Jan 16 21:42:09 2006 UTC revision 79 by dpavlin, Mon Jan 16 21:47:21 2006 UTC
# Line 129  ok($node1->set_auth('admin','admin'), "s Line 129  ok($node1->set_auth('admin','admin'), "s
129  # croak_on_error  # croak_on_error
130    
131  ok(my $node2 = new Search::Estraier::Node( url => "http://localhost:1978/non-existant", croak_on_error => 1 ), "new non-existant");  ok(my $node2 = new Search::Estraier::Node( url => "http://localhost:1978/non-existant", croak_on_error => 1 ), "new non-existant");
132  throws_ok { $node->name } qr/port/, 'croak on error';  throws_ok { $node2->name } qr/404/, 'croak on error';
133    
134  SKIP: {  SKIP: {
135          skip "no $test2_node in Hyper Estraier, skipping set_link", 2 unless (my $test1_label = $node1->label);          skip "no $test2_node in Hyper Estraier, skipping set_link", 2 unless (my $test1_label = $node1->label);
Legend:
Removed from v.78  
changed lines
  Added in v.79
  ViewVC Help
Powered by ViewVC 1.1.26