Fix unintended rename of workfiles

pull/1/head
Slávek Banko 11 years ago
parent 50c595422f
commit 8918209f54

@ -395,21 +395,21 @@ sub processMakefile ($)
if ($MakefileData =~ /\n$lookup/) {
my $condition = $1;
my $depfiles = $2;
my $wortdefiles;
my $workfiles;
if ($dep_finals) {
# Add the conditions on every line, since
# there may be line continuations in the list.
$wortdefiles = "$dep_files $dep_finals $depfiles";
$wortdefiles =~ s/\034/\034$condition\@KDE_USE_FINAL_TRUE\@\t/g;
$lines = "$condition\@KDE_USE_FINAL_TRUE\@DEP_FILES = $wortdefiles\n";
$wortdefiles = "$dep_files $depfiles";
$wortdefiles =~ s/\034/\034$condition\@KDE_USE_FINAL_FALSE\@\t/g;
$lines .= "$condition\@KDE_USE_FINAL_FALSE\@DEP_FILES = $wortdefiles";
$workfiles = "$dep_files $dep_finals $depfiles";
$workfiles =~ s/\034/\034$condition\@KDE_USE_FINAL_TRUE\@\t/g;
$lines = "$condition\@KDE_USE_FINAL_TRUE\@DEP_FILES = $workfiles\n";
$workfiles = "$dep_files $depfiles";
$workfiles =~ s/\034/\034$condition\@KDE_USE_FINAL_FALSE\@\t/g;
$lines .= "$condition\@KDE_USE_FINAL_FALSE\@DEP_FILES = $workfiles";
} else {
$wortdefiles = "$dep_files $depfiles";
$wortdefiles =~ s/\034/\034$condition\t/g;
$lines = $condition . "DEP_FILES = $wortdefiles";
$workfiles = "$dep_files $depfiles";
$workfiles =~ s/\034/\034$condition\t/g;
$lines = $condition . "DEP_FILES = $workfiles";
}
substituteLine($lookup, $lines);
}

Loading…
Cancel
Save