/[BackupPC]/trunk/bin/BackupPC_burnArchiveCLI
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_burnArchiveCLI

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

revision 278 by dpavlin, Tue Dec 13 23:47:13 2005 UTC revision 286 by dpavlin, Sun Jan 15 13:41:23 2006 UTC
# Line 295  foreach my $arc (@archives_to_burn) { Line 295  foreach my $arc (@archives_to_burn) {
295    
296          $sth_archive_backup_parts->execute($dvd_nr);          $sth_archive_backup_parts->execute($dvd_nr);
297    
298            if ($sth_archive_backup_parts->rows == 0) {
299                    warn "ERROR: no backup parts found for $dvd_nr. You should re-create that DVD.\n";
300            }
301    
302          my @volumes;          my @volumes;
303          my $v;  # emtpy volume          my $v;  # emtpy volume
304          my $v_size = 0;          my $v_size = 0;
# Line 317  foreach my $arc (@archives_to_burn) { Line 321  foreach my $arc (@archives_to_burn) {
321          }          }
322          push @volumes, $v if ($v);          push @volumes, $v if ($v);
323    
324            #warn "# volumes: ",Dumper(\@volumes),"\n";
325    
326          my $volumes = $#volumes + 1;          my $volumes = $#volumes + 1;
327          my $volume_nr = 1;          my $volume_nr = 1;
328    
Legend:
Removed from v.278  
changed lines
  Added in v.286
  ViewVC Help
Powered by ViewVC 1.1.26