X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=debian%2Frepack;h=dbd6b6c7bf511736a1d11ca10968d3e6b39f1dcc;hb=HEAD;hp=6c29dde0957d712b39b84f67c81c9e6edf00a8d6;hpb=c6cdb52dfb9504dde81bf18a009d9b5b8f6eb513;p=unscd.git

diff --git a/debian/repack b/debian/repack
index 6c29dde..dbd6b6c 100644
--- a/debian/repack
+++ b/debian/repack
@@ -42,6 +42,7 @@ use vars qw($DEBUG);
 
 use Cwd;
 use File::Temp qw(tempdir);
+use File::Copy qw(copy);
 
 my %options = (debug           => 0,
                help            => 0,
@@ -72,7 +73,7 @@ my $curdir = getcwd;
 my $orig_dir_name = 'unscd-'.$options{upstream_version};
 my $orig_dir_path = File::Spec->catfile($tdir,$orig_dir_name);
 mkdir($orig_dir_path) or die "Unable to mkdir $orig_dir_path: $!";
-rename($ARGV[0],File::Spec->catfile($orig_dir_path,'nscd.c')) or
+copy($ARGV[0],File::Spec->catfile($orig_dir_path,'nscd.c')) or
     die "Unable to copy $ARGV[0] to $orig_dir_path/nscd.c: $!";
 system('tar','-zcf',File::Spec->catfile($curdir,
                                         File::Spec->updir(),