'; #callback? return 3 html pieces? #' | ';
$text .=
@@ -463,9 +475,9 @@ END
#comment this block to disable initial list polulation
- my @initial_select;
+ my @initial_select = ();
if ( scalar( @$pops ) > 100 ) {
- @initial_select = ( $popnum2pop{$popnum} );
+ push @initial_select, $popnum2pop{$popnum} if $popnum2pop{$popnum};
} else {
@initial_select = @$pops;
}
@@ -513,7 +525,7 @@ sub regionselector {
my ( $selected_county, $selected_state, $selected_country,
$prefix, $onchange ) = @_;
- my $prefix = '' unless defined $prefix;
+ $prefix = '' unless defined $prefix;
my $countyflag = 0;