Put method name in test strings.
This commit is contained in:
parent
62d7ae0dbd
commit
afc15507fb
1 changed files with 3 additions and 3 deletions
|
@ -23,8 +23,8 @@ my $dbh = get_test_dbh();
|
|||
|
||||
my $sp = new Supporters($dbh, "testcmd");
|
||||
|
||||
is($dbh, $sp->dbh(), "verify dbh set");
|
||||
is("testcmd", $sp->ledgerCmd(), "verify ledgerCmd set");
|
||||
is($dbh, $sp->dbh(), "new: verify dbh set");
|
||||
is("testcmd", $sp->ledgerCmd(), "new: verify ledgerCmd set");
|
||||
|
||||
|
||||
=pod
|
||||
|
@ -33,7 +33,7 @@ Test adding a supporter to the database.
|
|||
|
||||
=cut
|
||||
|
||||
dies_ok(sub { $sp->addSupporter({}) }, "ledger_entity_id required");
|
||||
dies_ok(sub { $sp->addSupporter({}) }, "addSupporter: ledger_entity_id required");
|
||||
|
||||
|
||||
$dbh->disconnect();
|
||||
|
|
Loading…
Reference in a new issue