| … | … | ||
|---|---|---|---|
| 263 | 263 | ||
| 264 | # we _always_ delay kil's, to avoid calling mon callbacks | 264 | # we _always_ delay kil's, to avoid calling mon callbacks |
| 265 | # from anything but the event loop context. | 265 | # from anything but the event loop context. |
| 266 | $DELAY = 1; | 266 | $DELAY = 1; |
| 267 | push @DELAY, $delay_cb; | 267 | push @DELAY, $delay_cb; |
| 268 | $DELAY_W ||= AE::timer 0, 0, \&_send_delayed; | ||
| 268 | } | 269 | } |
| 269 | 270 | ||
| 270 | sub monitor { | 271 | sub monitor { |
| 271 | my ($self, $portid, $cb) = @_; | 272 | my ($self, $portid, $cb) = @_; |
| 272 | 273 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |