[DBD::Pg 1/2] More verbose tests
[email protected] Fri, 4 Apr 2014 19:12:39 +0000
| Newsgroups | perl.dbd.pg.changes |
|---|---|
| Message-ID | <[email protected]> |
Committed by Greg Sabino Mullane <[email protected]> Subject: [DBD::Pg 1/2] More verbose tests --- t/12placeholders.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/12placeholders.t b/t/12placeholders.t index b471b9e..86f4cc3 100644 --- a/t/12placeholders.t +++ b/t/12placeholders.t @@ -586,7 +586,7 @@ for my $char (qw!+ / : @ [ `!) { ## six characters $sth->execute(); $sth->finish(); }; - like ($@, qr{syntax error}, $t); + like ($@, qr{syntax error}, "$t: char=$char"); } $t='Dollar quotes with valid characters are parsed as identifiers'; -- 1.8.4