From 1720200cdbbd73919d3b25e221f3d47cdd12032d Mon Sep 17 00:00:00 2001 From: lawrence Date: Fri, 1 Sep 2006 01:51:46 +0000 Subject: Progress checkpoint on improved signup stuff for additional services --- fs_selfservice/FS-SelfService/cgi/signup.html | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) (limited to 'fs_selfservice/FS-SelfService/cgi') diff --git a/fs_selfservice/FS-SelfService/cgi/signup.html b/fs_selfservice/FS-SelfService/cgi/signup.html index 3e0f32749..1ba3d7702 100755 --- a/fs_selfservice/FS-SelfService/cgi/signup.html +++ b/fs_selfservice/FS-SelfService/cgi/signup.html @@ -257,6 +257,29 @@ ENDOUT } %> + +<%= +if ( @optional_packages ) { + my @html; + foreach my $ii ( 0 .. $#optional_packages) { + my $friendly_index = $ii + 1; + if ($optional_packages[$ii]) { + push @html, qq|Optional Package # $friendly_index
|,'
'; + + push @html, qq||; + + push @html, '
'; + } + $OUT = join("\n", @html); + } +} else { +$OUT = '' +} +%> +