set(LYX_SOURCE "${TempDir}/${file}.lyx")
message(STATUS "Using source \"${LYX_ROOT}/${file}.lyx\"")
message(STATUS "Using dest \"${LYX_SOURCE}\"")
- execute_process(COMMAND ${PERL_EXECUTABLE} "${Perl_Script}" "${LYX_ROOT}/${file}.lyx" "${LYX_SOURCE}" ${format} "default" "default" ${LanguageFile}
+ execute_process(COMMAND ${PERL_EXECUTABLE} "${Perl_Script}" "${LYX_ROOT}/${file}.lyx" "${LYX_SOURCE}" ${format} "dontChange" "default" ${LanguageFile}
RESULT_VARIABLE _err)
string(COMPARE EQUAL ${_err} 0 _erg)
if(NOT _erg)
if ($_[1] eq "systemF") {
$useNonTexFont = "true";
}
+ elsif ($_[1] eq "dontChange") {
+ $useNonTexFont = "dontChange";
+ }
else {
$useNonTexFont = "false";
$inputEncoding = $_[2];
push(@rElems, $elem, $elem1, $elem2);
}
}
- my $elemntf = newMatch("search" => qr/^\\use_non_tex_fonts\s+(false|true)/,
- "filetype" => "replace_only",
- "result" => ["\\use_non_tex_fonts $useNonTexFont"]);
- push(@rElems, $elemntf);
+ if ($useNonTexFont ne "dontChange") {
+ my $elemntf = newMatch("search" => qr/^\\use_non_tex_fonts\s+(false|true)/,
+ "filetype" => "replace_only",
+ "result" => ["\\use_non_tex_fonts $useNonTexFont"]);
+ push(@rElems, $elemntf);
+ }
if (defined($inputEncoding)) {
my $inputenc = newMatch("search" => qr/^\\inputencoding\s+($inputEncoding->{search})/,
"filetype" => "replace_only",