summaryrefslogtreecommitdiffstats
path: root/tools
diff options
context:
space:
mode:
authorJens Arnold <amiconn@rockbox.org>2007-09-04 22:13:52 +0000
committerJens Arnold <amiconn@rockbox.org>2007-09-04 22:13:52 +0000
commit2829aefe02e1bc01e7f7b99af0eb5137970003ce (patch)
tree1b609f95a872076f7297125a79c2c8a9a631829b /tools
parentfcf1f98518380ea0d18ce864ceb233a84b6d4a02 (diff)
downloadrockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.tar.gz
rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.tar.bz2
rockbox-2829aefe02e1bc01e7f7b99af0eb5137970003ce.zip
Only replace those abbreviations if they're capitalised.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@14610 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools')
-rwxr-xr-xtools/voice.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/voice.pl b/tools/voice.pl
index 8b5b27b82c..dae6456ed5 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"}) {