diff options
author | Eric Wong <e@yhbt.net> | 2021-01-17 07:09:57 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-01-18 09:25:11 +0000 |
commit | 2d7de5a87e1b4f5a5046161c8fd3b7f0085a5c19 (patch) | |
tree | 8d92a2368e97f9f2490e04b9e52814d892738fc1 /t | |
parent | b6505664ee76dd3b49cca3d1f55e4e5e602ffbde (diff) | |
download | public-inbox-2d7de5a87e1b4f5a5046161c8fd3b7f0085a5c19.tar.gz |
...by avoiding selectall_array in favor of selectall_arrayref. Tested with DBI 1.627.
Diffstat (limited to 't')
-rw-r--r-- | t/thread-index-gap.t | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/t/thread-index-gap.t b/t/thread-index-gap.t index f4e4bd09..83c3707d 100644 --- a/t/thread-index-gap.t +++ b/t/thread-index-gap.t @@ -45,12 +45,15 @@ for my $msgs (['orig', reverse @msgs], ['shuffle', shuffle(@msgs)]) { } $im->done; my $over = $ibx->over; - my @tid = $over->dbh->selectall_array('SELECT DISTINCT(tid) FROM over'); + my $dbh = $over->dbh; + my $tid = $dbh->selectall_arrayref('SELECT DISTINCT(tid) FROM over'); + my @tid = map { $_->[0] } @$tid; is(scalar(@tid), 1, "only one thread initially ($desc)"); $over->dbh_close; run_script([qw(-index --reindex --rethread), $ibx->{inboxdir}]) or BAIL_OUT 'rethread'; - @tid = $over->dbh->selectall_array('SELECT DISTINCT(tid) FROM over'); + $tid = $dbh->selectall_arrayref('SELECT DISTINCT(tid) FROM over'); + @tid = map { $_->[0] } @$tid; is(scalar(@tid), 1, "only one thread after rethread ($desc)"); } |