[Fai-commit] r4167 - trunk/bin
Thomas Lange
lange at alioth.debian.org
Sun Nov 26 15:59:12 CET 2006
Author: lange
Date: 2006-11-26 15:59:12 +0100 (Sun, 26 Nov 2006)
New Revision: 4167
Modified:
trunk/bin/fcopy
Log:
tmpfile is not always removed
Modified: trunk/bin/fcopy
===================================================================
--- trunk/bin/fcopy 2006-11-23 21:16:49 UTC (rev 4166)
+++ trunk/bin/fcopy 2006-11-26 14:59:12 UTC (rev 4167)
@@ -27,7 +27,7 @@
# 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#*********************************************************************
-my $version = "Version 2.2.9, 3-november-2006";
+my $version = "Version 2.2.10, 26-november-2006";
use strict;
use File::Copy;
@@ -162,12 +162,14 @@
print LOGFILE "$source\t$class$logcomment\n" if $logfile;
if ($preserve) {
warn "preserving $source \n";
+ _unlink($tmpfile) unless ($tmpfile eq $sourcefile);
return;
}
# if destination is a symlink and -l is given, complain about it
if ($opt_l && -l $destfile) {
ewarn("Destination $destfile is a symlink");
+ _unlink($tmpfile) unless ($tmpfile eq $sourcefile);
return;
}
More information about the Fai-commit
mailing list