diff options
author | ivan <ivan> | 2001-09-11 11:03:06 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-09-11 11:03:06 +0000 |
commit | fa0a72bfd08ec131523df6c40da96296ddadbb30 (patch) | |
tree | 3c1f0a8e3c6990fad199871ae6245457ee4841b4 /fs_signup/FS-SignupClient | |
parent | 34678d474a3710a38e42fd681607fe98edb56658 (diff) |
missing quote in new template
Diffstat (limited to 'fs_signup/FS-SignupClient')
-rwxr-xr-x | fs_signup/FS-SignupClient/cgi/signup.cgi | 4 | ||||
-rwxr-xr-x | fs_signup/FS-SignupClient/cgi/signup.html | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/fs_signup/FS-SignupClient/cgi/signup.cgi b/fs_signup/FS-SignupClient/cgi/signup.cgi index 0da960579..4ed5bf7d9 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.11 2001-08-30 16:23:32 ivan Exp $ +# $Id: signup.cgi,v 1.12 2001-09-11 11:03:06 ivan Exp $ use strict; use vars qw( @payby $cgi $locales $packages $pops $error @@ -414,7 +414,7 @@ Contact Information <%= foreach my $pop ( @{$pops} ) { - $OUT .= '<OPTION VALUE='. $pop->{'popnum'}. '"'; + $OUT .= '<OPTION VALUE="'. $pop->{'popnum'}. '"'; $OUT .= ' SELECTED' if $popnum && $pop->{'popnum'} == $popnum; $OUT .= '>'. $pop->{'popnum'}. ': '. $pop->{'city'}. ', '. $pop->{'state'}. ' ('. $pop->{'ac'}. ')/'. $pop->{'exch'}. "\n"; diff --git a/fs_signup/FS-SignupClient/cgi/signup.html b/fs_signup/FS-SignupClient/cgi/signup.html index bc02db230..fcedde3ab 100755 --- a/fs_signup/FS-SignupClient/cgi/signup.html +++ b/fs_signup/FS-SignupClient/cgi/signup.html @@ -135,7 +135,7 @@ Contact Information <%= foreach my $pop ( @{$pops} ) { - $OUT .= '<OPTION VALUE='. $pop->{'popnum'}. '"'; + $OUT .= '<OPTION VALUE="'. $pop->{'popnum'}. '"'; $OUT .= ' SELECTED' if $popnum && $pop->{'popnum'} == $popnum; $OUT .= '>'. $pop->{'popnum'}. ': '. $pop->{'city'}. ', '. $pop->{'state'}. ' ('. $pop->{'ac'}. ')/'. $pop->{'exch'}. "\n"; |