/[BackupPC]/trunk/bin/BackupPC_tarIncCreate
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/bin/BackupPC_tarIncCreate

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 271 by dpavlin, Tue Dec 13 18:29:05 2005 UTC revision 297 by dpavlin, Thu Jan 26 17:13:55 2006 UTC
# Line 333  sub new_tar_part { Line 333  sub new_tar_part {
333                  mkdir($tar_path) || die "can't create directory $tar_path: $!";                  mkdir($tar_path) || die "can't create directory $tar_path: $!";
334    
335                  sub abort_cleanup {                  sub abort_cleanup {
336                          print STDERR "ABORTED: cleanup temp dir";                          print STDERR "ABORTED: cleanup temp dir ";
337                          rmtree($tar_path);                          rmtree($tar_path);
338                          $dbh->rollback;                          $dbh->rollback;
339                          exit 1;                          exit 1;
# Line 376  if (seedCache($Host, $ShareName, $Num)) Line 376  if (seedCache($Host, $ShareName, $Num))
376          print STDERR "NOTE: no files found for $Host:$ShareName, increment $Num\n" if ($opts{v});          print STDERR "NOTE: no files found for $Host:$ShareName, increment $Num\n" if ($opts{v});
377          # remove temporary files if there are no files          # remove temporary files if there are no files
378          rmtree($tar_path);          rmtree($tar_path);
379    
380            my $sth = $dbh->prepare(qq{
381                    update backups set inc_size = 0, parts = 0, inc_deleted = true
382                    where id = ?
383            });
384            $sth->execute($backup_id);
385    
386  }  }
387    
388  #  #
Legend:
Removed from v.271  
changed lines
  Added in v.297
  ViewVC Help
Powered by ViewVC 1.1.26