| … | … | ||
|---|---|---|---|
| 312 | } | 312 | } |
| 313 | 313 | ||
| 314 | sub _shutdown { | 314 | sub _shutdown { |
| 315 | my ($self) = @_; | 315 | my ($self) = @_; |
| 316 | 316 | ||
| 317 | delete $self->{_tw}; | 317 | delete @$self{qw(_tw _rw _ww fh rbuf wbuf on_read _queue)}; |
| 318 | delete $self->{_rw}; | ||
| 319 | delete $self->{_ww}; | ||
| 320 | delete $self->{fh}; | ||
| 321 | 318 | ||
| 322 | &_freetls; | 319 | &_freetls; |
| 323 | |||
| 324 | delete $self->{on_read}; | ||
| 325 | delete $self->{_queue}; | ||
| 326 | } | 320 | } |
| 327 | 321 | ||
| 328 | sub _error { | 322 | sub _error { |
| 329 | my ($self, $errno, $fatal) = @_; | 323 | my ($self, $errno, $fatal) = @_; |
| 330 | 324 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |