Changeset dec03f2d3e745942e1e2d2bdf2df25db2d34070b

Show
Ignore:
Timestamp:
02/18/08 14:16:54 (6 years ago)
Author:
Theo Schlossnagle <jesus@omniti.com>
git-committer:
Theo Schlossnagle <jesus@omniti.com> 1203344214 +0000
git-parent:

[f89eddc107bca30248e16912a6b1a1162166bf0a]

git-author:
Theo Schlossnagle <jesus@omniti.com> 1203344214 +0000
Message:

fixes #23

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • zetaback.in

    rf89eddc rdec03f2  
    1010use POSIX qw/strftime/; 
    1111use Fcntl qw/:flock/; 
     12use File::Copy; 
    1213use IO::File; 
    1314use Pod::Usage; 
     
    859860      foreach my $file (@files) { 
    860861        (my $afile = $file) =~ s/^$store/$archive/; 
    861         rename($file, $afile) || print "Error archiving $file: $!\n"; 
     862        move($file, $afile) || print "Error archiving $file: $!\n"; 
    862863      } 
    863864    }