… | |
… | |
19 | |
19 | |
20 | my $self = $class->SUPER::new (%arg, |
20 | my $self = $class->SUPER::new (%arg, |
21 | setup_req => { |
21 | setup_req => { |
22 | extmap => 1, |
22 | extmap => 1, |
23 | excmd => 1, |
23 | excmd => 1, |
24 | xwidget2 => 1,#d# |
24 | widget => 1, |
25 | %{$arg{setup_req} || {}}, |
25 | %{$arg{setup_req} || {}}, |
26 | }, |
26 | }, |
27 | ); |
27 | ); |
28 | |
28 | |
29 | $self->{map_widget}->clr_commands; |
29 | $self->{map_widget}->clr_commands; |
… | |
… | |
1303 | 0 |
1303 | 0 |
1304 | }); |
1304 | }); |
1305 | |
1305 | |
1306 | $self->update_server_info; |
1306 | $self->update_server_info; |
1307 | |
1307 | |
1308 | $self->send_command ("output-sync $::CFG->{output_sync}"); |
|
|
1309 | $self->send_command ("output-count $::CFG->{output_count}"); |
|
|
1310 | $self->send_command ("output-rate $::CFG->{output_rate}") if $::CFG->{output_rate} > 0; |
1308 | $self->send_command ("output-rate $::CFG->{output_rate}") if $::CFG->{output_rate} > 0; |
1311 | $self->send_command ("pickup $::CFG->{pickup}"); |
1309 | $self->send_command ("pickup $::CFG->{pickup}"); |
1312 | } |
1310 | } |
1313 | |
1311 | |
1314 | sub lookat { |
1312 | sub lookat { |