- is_deeply($m{'<testmessage@example.com>'}->{kw}, ['flagged', 'seen'],
- 'flagged set in direct hit');
- 'TODO' or is_deeply($m{'<testmessage@example.com>'}->{kw}, ['draft'],
- 'flagged set in direct hit');
- lei_ok qw(q -t -t m:testmessage@example.com --only), "$ro_home/t2";
+ is_deeply($m{'testmessage@example.com'}->{kw}, ['flagged', 'seen'],
+ 'flagged set in direct hit') or diag explain($res);
+ is_deeply($m{'a-reply@miss'}->{kw}, ['draft'],
+ 'set in thread hit') or diag explain($res);
+ lei_ok qw(q -tt m:testmessage@example.com --only), "$ro_home/t2";
+ $res = json_utf8->decode($lei_out);
+ is_deeply($res->[0]->{kw}, [ qw(flagged seen) ],
+ 'flagged set on external with -tt') or diag explain($res);
+ lei_ok qw(q -t m:testmessage@example.com --only), "$ro_home/t2";