Ticket #857: mythrename-locally_accessible_files.patch
File mythrename-locally_accessible_files.patch, 699 bytes (added by , 18 years ago) |
---|
-
contrib/mythrename.pl
244 244 while (my $ref = $sh->fetchrow_hashref()) { 245 245 my %info = %{$ref}; 246 246 die "This script requires mythtv >= 0.19\n" unless ($info{'basename'}); 247 next unless (-e "$video_dir/".$info{'basename'}); 247 248 # Default times 248 249 my ($syear, $smonth, $sday, $shour, $sminute, $ssecond) = $info{'starttime'} =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/; 249 250 my ($eyear, $emonth, $eday, $ehour, $eminute, $esecond) = $info{'endtime'} =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/;