Index: export/generic.pm =================================================================== --- export/generic.pm (revision 236) +++ export/generic.pm (working copy) @@ -92,12 +92,15 @@ sub gen_cutlist { my $self = shift; my $episode = shift; - # Find mythcommflag - my $mythcommflag = find_program('mythcommflag'); - # Nothing? - die "Can't find mythcommflag.\n" unless ($mythcommflag); - # Generate the cutlist + # Check option + if ($self->val('gencutlist')) { + # Find mythcommflag + my $mythcommflag = find_program('mythcommflag'); + # Nothing? + die "Can't find mythcommflag.\n" unless ($mythcommflag); + # Generate the cutlist system("$NICE $mythcommflag --gencutlist -c $episode->{'channel'} -s $episode->{'start_time_sep'}"); + } } # Check for a duplicate filename, and return a full path to the output filename