Added support for FAX invoice destinations using a HylaFAX server.

[freeside.git] / httemplate / edit / cust_main.cgi

diff --git a/httemplate/edit/cust_main.cgi b/httemplate/edit/cust_main.cgi
index a18114c..61468f3 100755 (executable)
--- a/httemplate/edit/cust_main.cgi
+++ b/httemplate/edit/cust_main.cgi
@@ -76,7 +76,7 @@ my $action = $custnum ? 'Edit' : 'Add';
 
 <FORM ACTION="<%= popurl(1) %>process/cust_main.cgi" METHOD=POST NAME="form1" onSubmit="document.form1.submit.disabled=true">
 <INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>">
-ustomer # <%= $custnum ? "<B>$custnum</B>" : " (NEW)" %>
+Customer # <%= $custnum ? "<B>$custnum</B>" : " (NEW)" %>
 
 <!-- agent -->
 
@@ -302,8 +302,11 @@ if ( $payby_default eq 'HIDE' ) {
   print qq! CHECKED!
     if ( ! @invoicing_list && ! $conf->exists('disablepostalinvoicedefault') )
        || grep { $_ eq 'POST' } @invoicing_list;
-  print qq!>Postal mail invoice</TD></TR>!;
-  my $invoicing_list = join(', ', grep { $_ ne 'POST' } @invoicing_list );
+  print qq!>Postal mail invoice</TD></TR><TR><TD>!;
+  print qq!<INPUT TYPE="checkbox" NAME="invoicing_list_FAX" VALUE="FAX"!;
+  print qq! CHECKED! if (grep { $_ eq 'FAX' } @invoicing_list);
+  print qq!>FAX invoice</TD></TR>!;
+  my $invoicing_list = join(', ', grep { $_ !~ /^(POST|FAX)$/ } @invoicing_list );
   print qq!<TR><TD>Email invoice <INPUT TYPE="text" NAME="invoicing_list" VALUE="$invoicing_list"></TD></TR>!;
 
   print "<TR><TD>Billing type</TD></TR>",