1 files changed, 1 insertions, 0 deletions

diff --git a/lib/File/BackupCopy.pm b/lib/File/BackupCopy.pm
index b762e03..226e8ce 100644
--- a/lib/File/BackupCopy.pm
+++ b/lib/File/BackupCopy.pm
@@ -157,6 +157,7 @@ sub backup_copy_internal {
     unless (rename($fh->filename, $backup_name)) {
         return _backup_copy_error("can't rename temporary file to $backup_name: $!");
     }
+    $fh->unlink_on_destroy(0);
     return $backup_name;
 }