--- trunk/t/5_Node.t 2006/01/05 15:30:35 29 +++ trunk/t/5_Node.t 2006/01/05 15:38:34 32 @@ -3,7 +3,7 @@ use strict; use blib; -use Test::More tests => 5; +use Test::More tests => 10; use Test::Exception; use Data::Dumper; @@ -15,3 +15,11 @@ ok($node->set_url('http://localhost:1978/'), 'set_url'); ok($node->set_proxy('proxy.example.com', 8080), 'set_proxy'); +throws_ok {$node->set_proxy('proxy.example.com', 'foo') } qr/port/, 'set_proxy port NaN'; + +ok($node->set_timeout(42), 'set_timeout'); +throws_ok {$node->set_timeout('foo') } qr/timeout/, 'set_timeout NaN'; + +ok($node->set_auth('foo','bar'), 'set_auth'); + +cmp_ok($node->status, '==', -1, 'status');