Conservancy/supporters
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add actual test command.

Browse source
This commit is contained in:
Bradley M. Kuhn 2015-12-30 18:59:41 -08:00
parent 89a30119c7
commit f3a4ba8ef5
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
Supporters/t/Supporters.t
View file

@ -82,13 +82,12 @@ dies_ok { $sp = new Supporters($dbh, [ "testcmd" ], {monthly => 'test' }); }
dies_ok { $sp = new Supporters($dbh, [ "testcmd" ], {annual => 'test' }); } dies_ok { $sp = new Supporters($dbh, [ "testcmd" ], {annual => 'test' }); }
"new: dies when programTypeSearch key monthly is missing ."; "new: dies when programTypeSearch key monthly is missing .";
$sp = new Supporters($dbh, [ "testcmd" ]); my $cmd = [ "/bin/cat", $fakeLedgerFile ];
$sp = new Supporters($dbh, $cmd);
is($dbh, $sp->dbh(), "new: verify dbh set"); is($dbh, $sp->dbh(), "new: verify dbh set");
is_deeply($sp->ledgerCmd(), ["testcmd" ], "new: verify ledgerCmd set"); is_deeply($sp->ledgerCmd(), $cmd, "new: verify ledgerCmd set");
=pod
=item addSupporter =item addSupporter