| … | … | ||
|---|---|---|---|
| 564 | } | 564 | } |
| 565 | } | 565 | } |
| 566 | 566 | ||
| 567 | $node->monitor ($port, $cb); | 567 | $node->monitor ($port, $cb); |
| 568 | 568 | ||
| 569 | $cb += 0; | ||
| 570 | |||
| 571 | defined wantarray | 569 | defined wantarray |
| 570 | and $cb += 0 | ||
| 572 | and AnyEvent::Util::guard { $node->unmonitor ($port, $cb) } | 571 | and AnyEvent::Util::guard { $node->unmonitor ($port, $cb) } |
| 573 | } | 572 | } |
| 574 | 573 | ||
| 575 | =item $guard = mon_guard $port, $ref, $ref... | 574 | =item $guard = mon_guard $port, $ref, $ref... |
| 576 | 575 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |