Lines Matching refs:fullPath
176 my $fullPath = $1;
177 $directoriesToCheck{dirname($fullPath)} = 1;
189 if (basename($fullPath) eq "ChangeLog") {
190 my $changeLogDotOrigExisted = -f "${fullPath}.orig";
191 unapplyPatch(unsetChangeLogDate($fullPath, fixChangeLogPatch($patch)), $fullPath, ["--fuzz=3"]);
192 unlink("${fullPath}.orig") if (! $changeLogDotOrigExisted);
194 unapplyPatch($patch, $fullPath);
201 unlink($fullPath) if (-e $fullPath);
202 system "svn", "revert", $fullPath;
205 rename($fullPath, "$fullPath.orig") if -e $fullPath;
207 unapplyPatch($patch, $fullPath);
210 my ($fh, $tempPath) = tempfile(basename($fullPath) . "-XXXXXXXX",
211 DIR => dirname($fullPath), UNLINK => 1);
215 rename($fullPath, $tempPath);
216 system "svn", "revert", $fullPath;
217 rename($tempPath, $fullPath);
222 system "touch", $fullPath;
224 # Remove $fullPath.orig if it is the same as $fullPath
225 unlink("$fullPath.orig") if -e "$fullPath.orig" && checksum($fullPath) eq checksum("$fullPath.orig");
228 system "svn", "stat", $fullPath;
231 unapplyPatch($patch, $fullPath, ["--force"]);
232 unlink($fullPath) if -z $fullPath;
233 system "svn", "revert", $fullPath;
292 my $fullPath = shift;
295 sysopen(CHANGELOG, $fullPath, O_RDONLY) or die "Failed to open $fullPath: $!";
298 die "Failed reading $fullPath: $!" if !$byteCount || $byteCount != 10;