[DBD::Pg] Quick test to trigger bug in RT #99144

Committed by Greg Sabino Mullane <greg-O9fzpki4YnJWk0Htik3J/[email protected]>

Quick test to trigger bug in RT #99144

---
 t/03dbmethod.t | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/t/03dbmethod.t b/t/03dbmethod.t
index 5d040cd..57da55b 100644
--- a/t/03dbmethod.t
+++ b/t/03dbmethod.t
@@ -493,6 +493,9 @@ $sth = $dbh->table_info('%', '%', 'dbd_pg_test', '%');
 $number = $sth->rows();
 ok ($number, $t);
 
+$t=q{DB handle method "table_info" works when called with a 'TABLE' last argument};
+$sth = $dbh->table_info( '', '', '', "'TABLE'");
+
 # Check required minimum fields
 $t='DB handle method "table_info" returns fields required by DBI';
 $result = $sth->fetchall_arrayref({});
-- 
1.8.4