[Fai-commit] r3292 - trunk/bin

[fai-repository at svn.debian.org]

Author: lange
Date: 2006-03-19 22:22:42 +0000 (Sun, 19 Mar 2006)
New Revision: 3292

Modified:
   trunk/bin/fcopy
Log:
add warning if unlink fails


Modified: trunk/bin/fcopy
===================================================================
--- trunk/bin/fcopy	2006-03-19 18:25:02 UTC (rev 3291)
+++ trunk/bin/fcopy	2006-03-19 22:22:42 UTC (rev 3292)
@@ -27,7 +27,7 @@
 # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 #*********************************************************************
 
-my $version = "Version 2.1.1, 5-march-2006";
+my $version = "Version 2.1.2, 19-march-2006";
 
 use strict;
 use File::Copy;
@@ -99,7 +99,7 @@
     if ($opt_d and -f $destfile) {
       print LOGFILE "$source\tNONE\t# removed (no matching class)\n" if $logfile;
       if ($nobackup) {
-        unlink($destfile)
+        unlink($destfile) || ewarn("Could not remove file $destfile");
       } else {
         mkpath($bpath,$debug,0755) unless -d $bpath;
 	move($destfile,$backupfile) if -d $bpath;;