xmltv/lib Augment.pm,1.15,1.16

Update of /cvsroot/xmltv/xmltv/lib
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv25987/lib

Modified Files:
	Augment.pm 
Log Message:
Update process_replacement_film_genres()

* avoid unnecessary defined-ness check

The defined-ness of $prog->{'_genres'} is already checked in the
enclosing block


Index: Augment.pm
===================================================================
RCS file: /cvsroot/xmltv/xmltv/lib/Augment.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** Augment.pm	12 Jul 2016 01:29:10 -0000	1.15
--- Augment.pm	12 Jul 2016 01:29:21 -0000	1.16
***************
*** 2300,2315 ****
  
  				my $old = '';
! 				if (defined $prog->{'_genres'}) {
! 					foreach my $genre (@{ $prog->{'_genres'} }) {
! 						$old .= $genre->[0] . ',';
  
! 						# is it a film?
! 						if ( $genre->[0] =~ m/films?/i ) {
! 							$isfilm = 1;
! 						}
  
! 					}
! 					chop $old;
! 				}
  
  				if (!$isfilm) {
--- 2300,2313 ----
  
  				my $old = '';
!                 foreach my $genre (@{ $prog->{'_genres'} }) {
!                     $old .= $genre->[0] . ',';
  
!                     # is it a film?
!                     if ( $genre->[0] =~ m/films?/i ) {
!                         $isfilm = 1;
!                     }
  
!                 }
!                 chop $old;
  
  				if (!$isfilm) {


------------------------------------------------------------------------------
What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
patterns at an interface-level. Reveals which users, apps, and protocols are 
consuming the most bandwidth. Provides multi-vendor support for NetFlow, 
J-Flow, sFlow and other flows. Make informed decisions using capacity planning
reports.http://sdm.link/zohodev2dev