Bug 409333 - Corrupted string of being installed component shown during installation. r=bsmedberg, blocking-firefox3=beltzner

git-svn-id: svn://10.0.0.236/trunk@249007 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
rob_strong%exchangecode.com
2008-04-02 19:06:27 +00:00
parent 03b1e7c6dd
commit 0e36f86820

View File

@@ -103,6 +103,7 @@ while( $line = <infile> ) {
$value =~ s/\s+$//; # trim whitespace from the end of the string
$value =~ s/^"(.*)"$/$1/g; # remove " at the beginning and end of the value
$value =~ s/(")/\$\\$1/g; # prefix " with $\
$value =~ s/…/.../g; # replace … (unicode ellipsis) with ...
print outfile "LangString ^@values[0] $langID \"$value\"\r\n";
$lnum++;
}
@@ -134,6 +135,7 @@ while( $line = <infile> ) {
$value =~ s/(")/\$\\$1/g; # prefix " with $\
$value =~ s/(\\n)/\\r$1/g; # insert \\r before each occurence of \\n
$value =~ s/(\\r)\\r/$1/g; # replace all ocurrences of \\r\\r with \\r
$value =~ s/…/.../g; # replace … (unicode ellipsis) with ...
print outfile "!define @values[0] \"$value\"\r\n";
$lnum++;
}
@@ -162,6 +164,7 @@ while( $line = <infile> ) {
$string =~ s/(\\n)/\\r$1/g; # insert \\r before each occurence of \\n
$string =~ s/(\\r)\\r/$1/g; # replace all ocurrences of \\r\\r with \\r
$string =~ s/(\\[rn])/\$$1/g; # prefix all occurences of \\r and \\n with $
$string =~ s/…/.../g; # replace … (unicode ellipsis) with ...
print outfile "LangString @values[0] $langID \"$string\"\r\n";
$lnum++;
}