$ii->event_step;
is(scalar @{$obj->{called}}, 1, 'called on unlock');
$pi_cfg->each_inbox(sub { shift->unsubscribe_unlock($ident) });
ok($im->add(eml_load('t/data/0001.patch')), "$V added #2");
$im->done;
$ii->event_step;
is(scalar @{$obj->{called}}, 1, 'called on unlock');
$pi_cfg->each_inbox(sub { shift->unsubscribe_unlock($ident) });
ok($im->add(eml_load('t/data/0001.patch')), "$V added #2");
$im->done;