… | … | ||
---|---|---|---|
343 | 343 | ||
344 | sub event_part { | 344 | sub event_part { |
345 | my ($self) = @_; | 345 | my ($self) = @_; |
346 | 346 | ||
347 | $self->SUPER::event_part; | 347 | $self->SUPER::event_part; |
348 | $self->destroy; | ||
349 | } | ||
350 | |||
351 | sub event_quit { | ||
352 | my ($self) = @_; | ||
353 | |||
354 | $self->SUPER::event_quit; | ||
348 | $self->destroy; | 355 | $self->destroy; |
349 | } | 356 | } |
350 | 357 | ||
351 | ### USERS ################################################################### | 358 | ### USERS ################################################################### |
352 | 359 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |