diff options
| author | Jens Arnold <amiconn@rockbox.org> | 2007-09-04 22:13:52 +0000 |
|---|---|---|
| committer | Jens Arnold <amiconn@rockbox.org> | 2007-09-04 22:13:52 +0000 |
| commit | 2829aefe02e1bc01e7f7b99af0eb5137970003ce (patch) | |
| tree | 1b609f95a872076f7297125a79c2c8a9a631829b | |
| parent | fcf1f98518380ea0d18ce864ceb233a84b6d4a02 (diff) | |
| download | rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.zip rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.tar.gz rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.tar.bz2 rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.tar.xz | |
Only replace those abbreviations if they're capitalised.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@14610 a1c6a512-1295-4272-9138-f99709370657
| -rwxr-xr-x | tools/voice.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/voice.pl b/tools/voice.pl index 8b5b27b..dae6456 100755 --- a/tools/voice.pl +++ b/tools/voice.pl @@ -94,7 +94,7 @@ sub init_tts { print(CMD_IN "QUERY\tVENDOR\r\n"); my $vendor = readline(CMD_OUT); $vendor =~ s/\r\n//; - %ret = (%ret, + %ret = (%ret, "stdin" => *CMD_IN, "stdout" => *CMD_OUT, "toolspath" => $path, @@ -126,8 +126,8 @@ sub correct_string { my $orig = $string; switch($language) { # General for all engines and languages - $string =~ s/USB/U S B/ig; - $string =~ s/ID3/I D 3/ig; + $string =~ s/USB/U S B/g; + $string =~ s/ID3/I D 3/g; case "english" { switch($$tts_object{"name"}) { |