Ticket #857: mythrename-locally_accessible_files.patch

File mythrename-locally_accessible_files.patch, 699 bytes (added by sphery <mtdean@…>, 18 years ago)

Attached patch for ease of access. Same as the patch Tom posted in his second comment.

  • contrib/mythrename.pl

     
    244244    while (my $ref = $sh->fetchrow_hashref()) {
    245245        my %info = %{$ref};
    246246        die "This script requires mythtv >= 0.19\n" unless ($info{'basename'});
     247        next unless (-e "$video_dir/".$info{'basename'});
    247248    # Default times
    248249        my ($syear, $smonth, $sday, $shour, $sminute, $ssecond) = $info{'starttime'} =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/;
    249250        my ($eyear, $emonth, $eday, $ehour, $eminute, $esecond) = $info{'endtime'}   =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/;