diff options
| author | ivan <ivan> | 2003-07-04 03:19:14 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-07-04 03:19:14 +0000 |
| commit | ed27c174a1bfb98fdb48b8765dabb0ac6c7d9494 (patch) | |
| tree | d6457d75d2d3c29c08f935ed0af6a0e5be11f429 /fs_signup | |
| parent | 42a03e01317faf49ca98782cdd0c7f7476157267 (diff) | |
don't use any javascript for pop selection if init_popstate is specified
Diffstat (limited to 'fs_signup')
| -rwxr-xr-x | fs_signup/FS-SignupClient/cgi/signup.cgi | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/fs_signup/FS-SignupClient/cgi/signup.cgi b/fs_signup/FS-SignupClient/cgi/signup.cgi index afc8cfe..d371641 100755 --- a/fs_signup/FS-SignupClient/cgi/signup.cgi +++ b/fs_signup/FS-SignupClient/cgi/signup.cgi @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: signup.cgi,v 1.29.2.12 2003-07-04 03:15:41 ivan Exp $ +# $Id: signup.cgi,v 1.29.2.13 2003-07-04 03:19:14 ivan Exp $ use strict; use vars qw( @payby $cgi $locales $packages @@ -390,19 +390,18 @@ sub popselector { #my %pop = (); #push @{ $pop{$_->{state}} }, $_ foreach @$pops; - my $text = <<END; - <SCRIPT> - function opt(what,href,text) { - var optionName = new Option(text, href, false, false) - var length = what.length; - what.options[length] = optionName; - } -END + my $text; if ( $init_popstate ) { $text .='<INPUT TYPE="hidden" NAME="init_popstate" VALUE="$init_popstate">'; } else { $text .= <<END; + <SCRIPT> + function opt(what,href,text) { + var optionName = new Option(text, href, false, false) + var length = what.length; + what.options[length] = optionName; + } function popstate_changed(what) { state = what.options[what.selectedIndex].text; what.form.popnum.options.length = 0; |