… | |
… | |
637 | } |
637 | } |
638 | |
638 | |
639 | sub map_scroll { |
639 | sub map_scroll { |
640 | my ($self, $dx, $dy) = @_; |
640 | my ($self, $dx, $dy) = @_; |
641 | |
641 | |
642 | $self->{map}->scroll ($dx, $dy); |
642 | $self->{map_widget}->scroll ($dx, $dy); |
643 | } |
643 | } |
644 | |
644 | |
645 | sub feed_map1a { |
645 | sub feed_map1a { |
646 | my ($self, $data) = @_; |
646 | my ($self, $data) = @_; |
647 | |
647 | |
… | |
… | |
1364 | |
1364 | |
1365 | $self->update_server_info; |
1365 | $self->update_server_info; |
1366 | |
1366 | |
1367 | $self->send_command ("output-rate $::CFG->{output_rate}") if $::CFG->{output_rate} > 0; |
1367 | $self->send_command ("output-rate $::CFG->{output_rate}") if $::CFG->{output_rate} > 0; |
1368 | $self->send_command ("pickup $::CFG->{pickup}"); |
1368 | $self->send_command ("pickup $::CFG->{pickup}"); |
|
|
1369 | |
|
|
1370 | $self->send_exti_msg (clientlog => sprintf "OpenGL Info: %s [%s]", |
|
|
1371 | DC::OpenGL::gl_vendor, DC::OpenGL::gl_version);#d# |
1369 | } |
1372 | } |
1370 | |
1373 | |
1371 | sub lookat { |
1374 | sub lookat { |
1372 | my ($self, $x, $y) = @_; |
1375 | my ($self, $x, $y) = @_; |
1373 | |
1376 | |