--- trunk/t/5_Node.t 2006/01/05 15:30:35 29 +++ trunk/t/5_Node.t 2006/01/05 15:33:48 30 @@ -3,7 +3,7 @@ use strict; use blib; -use Test::More tests => 5; +use Test::More tests => 8; use Test::Exception; use Data::Dumper; @@ -15,3 +15,7 @@ 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';