This commit is contained in:
Matthew Wilson 2006-04-17 09:57:43 +00:00
parent 77153b93fe
commit f940fec130

View file

@ -1020,6 +1020,9 @@ sub getSubEventForm {
}); });
} }
} }
return '' unless scalar(@subEventLoop);
my $scratchCart = [split("\n",$self->session->scratch->get('EMS_scratch_cart'))]; my $scratchCart = [split("\n",$self->session->scratch->get('EMS_scratch_cart'))];
foreach (@$scratchCart) { foreach (@$scratchCart) {
@ -1040,7 +1043,7 @@ sub getSubEventForm {
$var{'subevents_loop'} = \@subEventLoop; $var{'subevents_loop'} = \@subEventLoop;
$var{'chooseSubevents'} = 1; $var{'chooseSubevents'} = 1;
my $output; my $output;
$output = \%var if (scalar (@subEventLoop) > 0); $output = \%var if scalar(@subEventLoop);
return $output; return $output;
} }