… | |
… | |
422 | } |
422 | } |
423 | |
423 | |
424 | sub face_update { |
424 | sub face_update { |
425 | my ($self, $facenum, $face) = @_; |
425 | my ($self, $facenum, $face) = @_; |
426 | |
426 | |
427 | $self->{tilecache}->put ($face->{id} => $face->{image}); #TODO: try to avoid duplicate writes |
427 | $self->{tilecache}->put ($face->{id} => $face->{image}) |
|
|
428 | if $self->{tilecache}->get ($face->{id}) ne $face->{image}; |
428 | |
429 | |
429 | $self->set_texture ($face->{id} => delete $face->{image}); |
430 | $self->set_texture ($face->{id} => delete $face->{image}); |
430 | } |
431 | } |
431 | |
432 | |
432 | sub set_texture { |
433 | sub set_texture { |
… | |
… | |
919 | sub destroy { |
920 | sub destroy { |
920 | my ($self) = @_; |
921 | my ($self) = @_; |
921 | |
922 | |
922 | #Carp::cluck "debug\n";#d# #todo# enable: destroy gets called twice because scalar keys {} is 1 |
923 | #Carp::cluck "debug\n";#d# #todo# enable: destroy gets called twice because scalar keys {} is 1 |
923 | |
924 | |
|
|
925 | $self->{conn}->send ("ext npc_dialog_end $self->{token}") if $self->{token}; |
924 | delete $self->{conn}{npc_dialog}; |
926 | delete $self->{conn}{npc_dialog}; |
925 | $self->{conn}->disconnect_ext ($self->{token}); |
927 | $self->{conn}->disconnect_ext ($self->{token}); |
926 | |
928 | |
927 | $self->SUPER::destroy; |
929 | $self->SUPER::destroy; |
928 | } |
930 | } |