From 903a048ddcf5b95dc85d1c440daf0f397b6d60b0 Mon Sep 17 00:00:00 2001 From: Jens Arnold Date: Sun, 20 Jul 2008 13:55:04 +0000 Subject: Fix 'Bareword ''CMD_OUT'' not allowed while ''strict subs'' in use' when building SAPI voices using newer perl versions. git-svn-id: svn://svn.rockbox.org/rockbox/trunk@18102 a1c6a512-1295-4272-9138-f99709370657 --- tools/voice.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tools/voice.pl') 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, -- cgit v1.2.3