| … | … | ||
|---|---|---|---|
| 400 | 400 | ||
| 401 | snd $_, message => $msg | 401 | snd $_, message => $msg |
| 402 | for keys %client_ports; | 402 | for keys %client_ports; |
| 403 | 403 | ||
| 404 | 0 | 404 | 0 |
| 405 | }); | 405 | }; |
| 406 | 406 | ||
| 407 | AnyEvent->condvar->recv; | 407 | AnyEvent->condvar->recv; |
| 408 | 408 | ||
| 409 | That is all. Looks much simpler than the client, doesn't it? | 409 | That is all. Looks much simpler than the client, doesn't it? |
| 410 | 410 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |