'; #callback? return 3 html pieces? #' | ';
$text .=
@@ -463,9 +483,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 +533,7 @@ sub regionselector {
my ( $selected_county, $selected_state, $selected_country,
$prefix, $onchange ) = @_;
- my $prefix = '' unless defined $prefix;
+ $prefix = '' unless defined $prefix;
my $countyflag = 0;
@@ -635,7 +655,7 @@ Signup information for <%= $email_name %>:
Username: <%= $username %>
Password: <%= $password %>
-Access number: (<%= $ac %>) / $exch - $local
+Access number: (<%= $ac %>) / <%= $exch %> - <%= $local %>
Package: <%= $pkg %>