[mythtv-commits] Re: Ticket #857: Patch to mythrename.pl to work correctly with slave backends

MythTV mythtv at cvs.mythtv.org
Thu Dec 22 21:34:14 EST 2005


#857: Patch to mythrename.pl to work correctly with slave backends
-------------------------------------+--------------------------------------
 Reporter:  tom at redpepperracing.com  |        Owner:  ijr 
     Type:  patch                    |       Status:  new 
 Priority:  minor                    |    Milestone:      
Component:  mythtv                   |      Version:  head
 Severity:  low                      |   Resolution:      
-------------------------------------+--------------------------------------
Comment (by tom at redpepperracing.com):

 A better patch from Mike Dean on the mailing list, that actually does what
 was intended. This supercedes my patch above.

 {{{

 Index: contrib/mythrename.pl
 ===================================================================
 --- contrib/mythrename.pl       (revision 8364)
 +++ contrib/mythrename.pl       (working copy)
 @@ -244,6 +244,7 @@
      while (my $ref = $sh->fetchrow_hashref()) {
          my %info = %{$ref};
          die "This script requires mythtv >= 0.19\n" unless
 ($info{'basename'});
 +        next unless (-e "$video_dir/".$info{'basename'});
      # Default times
          my ($syear, $smonth, $sday, $shour, $sminute, $ssecond) =
 $info{'starttime'} =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/;
          my ($eyear, $emonth, $eday, $ehour, $eminute, $esecond) =
 $info{'endtime'}   =~ /(\d+)-(\d+)-(\d+)\s+(\d+):(\d+):(\d+)/;

 }}}

-- 
Ticket URL: <http://svn.mythtv.org/trac/ticket/857>
MythTV <http://www.mythtv.org/>
MythTV


More information about the mythtv-commits mailing list