diff options
| -rwxr-xr-x | tools/voice.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/voice.pl b/tools/voice.pl index eb6bfc1bf6..8e0a7f0152 100755 --- a/tools/voice.pl +++ b/tools/voice.pl @@ -93,7 +93,7 @@ sub init_tts { $SIG{INT} = sub { print(CMD_IN "QUIT\r\n"); panic_cleanup(); }; $SIG{KILL} = sub { print(CMD_IN "QUIT\r\n"); panic_cleanup(); }; print(CMD_IN "QUERY\tVENDOR\r\n"); - my $vendor = readline(CMD_OUT); + my $vendor = readline(*CMD_OUT); $vendor =~ s/\r\n//; %ret = (%ret, "stdin" => *CMD_IN, |