forked from len0rd/rockbox
Only replace those abbreviations if they're capitalised.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@14610 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
parent
fcf1f98518
commit
2829aefe02
1 changed files with 3 additions and 3 deletions
|
|
@ -94,7 +94,7 @@ sub init_tts {
|
||||||
print(CMD_IN "QUERY\tVENDOR\r\n");
|
print(CMD_IN "QUERY\tVENDOR\r\n");
|
||||||
my $vendor = readline(CMD_OUT);
|
my $vendor = readline(CMD_OUT);
|
||||||
$vendor =~ s/\r\n//;
|
$vendor =~ s/\r\n//;
|
||||||
%ret = (%ret,
|
%ret = (%ret,
|
||||||
"stdin" => *CMD_IN,
|
"stdin" => *CMD_IN,
|
||||||
"stdout" => *CMD_OUT,
|
"stdout" => *CMD_OUT,
|
||||||
"toolspath" => $path,
|
"toolspath" => $path,
|
||||||
|
|
@ -126,8 +126,8 @@ sub correct_string {
|
||||||
my $orig = $string;
|
my $orig = $string;
|
||||||
switch($language) {
|
switch($language) {
|
||||||
# General for all engines and languages
|
# General for all engines and languages
|
||||||
$string =~ s/USB/U S B/ig;
|
$string =~ s/USB/U S B/g;
|
||||||
$string =~ s/ID3/I D 3/ig;
|
$string =~ s/ID3/I D 3/g;
|
||||||
|
|
||||||
case "english" {
|
case "english" {
|
||||||
switch($$tts_object{"name"}) {
|
switch($$tts_object{"name"}) {
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue