| … | |
… | |
| 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 | } |
