X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fpart_svc.cgi;h=7797230e83be50a0fd17dff561d793142dad1b54;hb=58747692435f28de1c13496525af679659511b05;hp=0deed7b99a2dc9d12dfd02bc0f8151289b514850;hpb=842df85f746a2e1b961d6c9e3a8c5cc3678ae6dd;p=freeside.git diff --git a/httemplate/edit/part_svc.cgi b/httemplate/edit/part_svc.cgi index 0deed7b99..7797230e8 100755 --- a/httemplate/edit/part_svc.cgi +++ b/httemplate/edit/part_svc.cgi @@ -1,4 +1,4 @@ - + <% my $part_svc; if ( $cgi->param('error') ) { #error @@ -44,10 +44,9 @@ function visualize(what) {
<% #these might belong somewhere else for other user interfaces @@ -145,9 +144,13 @@ foreach my $svcdb ( qw( konq_kludge svc_acct svc_domain svc_acct_sm svc_forward svc_www ) ) { - my(@fields) = $svcdb eq 'konq_kludge' - ? () - : grep { $_ ne 'svcnum' } fields($svcdb); +# my(@fields) = $svcdb eq 'konq_kludge' +# ? () +# : grep { $_ ne 'svcnum' } fields($svcdb); + #yucky kludge + my(@fields) = defined( $FS::Record::dbdef->table($svcdb) ) + ? grep { $_ ne 'svcnum' } fields($svcdb) + : (); #my($rowspan)=scalar(@rows); #my($ptmp)="