… | |
… | |
42 | $input->set_text (''); |
42 | $input->set_text (''); |
43 | |
43 | |
44 | if ($text =~ /^\/(.*)/) { |
44 | if ($text =~ /^\/(.*)/) { |
45 | $::CONN->user_send ($1); |
45 | $::CONN->user_send ($1); |
46 | } else { |
46 | } else { |
47 | my $say_cmd = $::CFG->{say_command} || 'say'; |
47 | my $say_cmd = $self->{say_command}; |
|
|
48 | if ($say_cmd eq '') { |
|
|
49 | $::CONN->user_send ($text); |
|
|
50 | } else { |
48 | $::CONN->user_send ("$say_cmd $text"); |
51 | $::CONN->user_send ("$say_cmd $text"); |
|
|
52 | } |
49 | } |
53 | } |
50 | if ($input->{refocus_map}) { |
54 | if ($input->{refocus_map}) { |
51 | delete $input->{refocus_map}; |
55 | delete $input->{refocus_map}; |
52 | $::MAPWIDGET->focus_in |
56 | $::MAPWIDGET->focus_in |
53 | } |
57 | } |