зеркало из https://github.com/mozilla/pjs.git
'@' needs to be escaped inside strings in perl. fixing mac cfm bustage.
This commit is contained in:
Родитель
a240643f5e
Коммит
a819c9f40f
|
@ -67,10 +67,10 @@ sub UpdateGeneratedChromeFiles()
|
|||
open (IN, "${file}.in") || die("${file}.in: $!\n");
|
||||
open (OUT, ">$file") || die ("$file: $!\n");
|
||||
while ($tmp=<IN>) {
|
||||
$tmp =~ s/@target@/Mac CFM/;
|
||||
$tmp =~ s/@CC@/CodeWarrior/;
|
||||
$tmp =~ s/@CXX@/CodeWarrior/;
|
||||
$tmp =~ s/@\S+@//;
|
||||
$tmp =~ s/\@target\@/Mac CFM/;
|
||||
$tmp =~ s/\@CC\@/CodeWarrior/;
|
||||
$tmp =~ s/\@CXX\@/CodeWarrior/;
|
||||
$tmp =~ s/\@\S+\@//;
|
||||
print OUT "$tmp";
|
||||
}
|
||||
close(OUT);
|
||||
|
|
Загрузка…
Ссылка в новой задаче