my $clones = add $nick, host($userhost), $serv, $chan;
return EAT_NONE unless $clones > 0;
- local_context $chan, $serv => sub {
+ my $printer = sub {
print $ph clone_enter_str $userhost, $nick, $clones;
1
- } or do {
- delay JOIN_DELAY, sub {
- local_context $chan, $serv => sub {
- print $ph clone_enter_str $userhost, $nick, $clones;
- }
- }
+ };
+
+ local_context $chan, $serv, $printer or delay JOIN_DELAY, sub {
+ local_context $chan, $serv, $printer;
};
return EAT_NONE;