--- trunk/t/1_load.t 2005/05/15 21:19:26 20 +++ trunk/t/1_nos.t 2005/05/16 21:54:41 30 @@ -3,6 +3,11 @@ use strict; use blib; -use Test::More tests => 1; -BEGIN { use_ok('Notices') }; +use Test::More tests => 4; +BEGIN { use_ok('Nos') }; +ok(my $nos = new Nos('dsn' => 'dbi:Pg:dbname=notices'), "new"); + +ok($nos->add_member_to_list( list => 'My list', email => 'foo@example.com' ), "add_member_to_list"); + +ok($nos->add_message_to_list( list => 'My list', message => 'Subject: test\nJust a test' ), "add_message_to_list");