| … | |
… | |
| 69 | } |
69 | } |
| 70 | |
70 | |
| 71 | sub event_update_games { |
71 | sub event_update_games { |
| 72 | my ($self, $add, $update, $remove) = @_; |
72 | my ($self, $add, $update, $remove) = @_; |
| 73 | |
73 | |
| 74 | $appwin::gamelist->update ($self, $add, $update, $remove); |
74 | $self->{app}{gamelist}->update ($self, $add, $update, $remove); |
| 75 | } |
75 | } |
| 76 | |
76 | |
| 77 | sub event_join { |
77 | sub event_join { |
| 78 | my ($self) = @_; |
78 | my ($self) = @_; |
| 79 | $self->SUPER::event_join; |
79 | $self->SUPER::event_join; |
| … | |
… | |
| 89 | |
89 | |
| 90 | sub event_part { |
90 | sub event_part { |
| 91 | my ($self) = @_; |
91 | my ($self) = @_; |
| 92 | |
92 | |
| 93 | delete $::config->{rooms}{$self->{channel}}; |
93 | delete $::config->{rooms}{$self->{channel}}; |
| 94 | delete $appwin::self->{roomlist}{room}{$self->{channel}}; |
94 | delete $self->{app}{roomlist}{room}{$self->{channel}}; |
| 95 | (remove Glib::Source delete $self->{gameupdate}) if $self->{gameupdate}; |
95 | (remove Glib::Source delete $self->{gameupdate}) if $self->{gameupdate}; |
| 96 | $self->unlisten; |
96 | $self->unlisten; |
| 97 | |
97 | |
| 98 | $self->SUPER::event_part; |
98 | $self->SUPER::event_part; |
| 99 | } |
99 | } |
