| … | … | ||
|---|---|---|---|
| 327 | } | 327 | } |
| 328 | 328 | ||
| 329 | sub _shutdown { | 329 | sub _shutdown { |
| 330 | my ($self) = @_; | 330 | my ($self) = @_; |
| 331 | 331 | ||
| 332 | delete @$self{qw(_tw _rw _ww fh rbuf wbuf on_read _queue)}; | 332 | delete @$self{qw(_tw _rw _ww fh wbuf on_read _queue)}; |
| 333 | $self->{_eof} = 1; # tell starttls et. al to stop trying | 333 | $self->{_eof} = 1; # tell starttls et. al to stop trying |
| 334 | 334 | ||
| 335 | &_freetls; | 335 | &_freetls; |
| 336 | } | 336 | } |
| 337 | 337 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |