TDE
/
tde-common-admin
mirror of https://mirror.git.trinitydesktop.org/gitea/TDE/tde-common-admin
0
0
Fork 0
Code Issues Releases Wiki Activity

Fix unintended rename of workfiles

Browse Source
pull/1/head
Slávek Banko 10 years ago
parent 50c595422f
commit 8918209f54
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File

20
am_edit
Unescape View File

@ -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);
}

Write Preview
Loading…
Cancel
Save