[freeside-commits] freeside/fs_selfservice/FS-SelfService/cgi
signup.html, 1.4, 1.5
Lawrence Statton
lawrence at wavetail.420.am
Thu Aug 31 18:51:48 PDT 2006
Update of /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi
In directory wavetail:/tmp/cvs-serv3818/fs_selfservice/FS-SelfService/cgi
Modified Files:
signup.html
Log Message:
Progress checkpoint on improved signup stuff for additional services
Index: signup.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/signup.html,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- signup.html 29 Aug 2006 17:50:06 -0000 1.4
+++ signup.html 1 Sep 2006 01:51:46 -0000 1.5
@@ -257,6 +257,29 @@
}
%>
</TABLE>
+
+<%=
+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 <br />|,'<table bgcolor="#c0c0c0"><tr><td>';
+
+ push @html, qq|<select name="optional_package${ii}">|;
+ push @html, qq|<option value="none"></option>|;
+ push @html, map { qq|<option value="$_->{pkgpart}">$_->{pkg}</option>| } @{$optional_packages[$ii]};
+ push @html, q|</select>|;
+
+ push @html, '</td></tr></table>';
+ }
+ $OUT = join("\n", @html);
+ }
+} else {
+$OUT = ''
+}
+%>
+
<BR><BR><INPUT TYPE="submit" NAME="signup" VALUE="Signup">
<script language="JavaScript">
More information about the freeside-commits
mailing list