[freeside-commits] freeside/httemplate/misc svc_acct-domains.cgi, 1.2, 1.2.2.1

Jeff Finucane,420,, jeff at wavetail.420.am
Wed Feb 28 11:41:32 PST 2007


Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail:/tmp/cvs-serv19021/misc

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	svc_acct-domains.cgi 
Log Message:
restore (none) choice to first package select

Index: svc_acct-domains.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/svc_acct-domains.cgi,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- svc_acct-domains.cgi	16 Feb 2007 20:54:06 -0000	1.2
+++ svc_acct-domains.cgi	28 Feb 2007 19:41:30 -0000	1.2.2.1
@@ -3,9 +3,10 @@
 %  my $pkgpart_svcpart = $cgi->param('arg');
 %  $pkgpart_svcpart =~ /^\d+_(\d+)$/;
 %  my $part_svc = qsearchs('part_svc', { 'svcpart' => $1 }) if $1;
-%  my $part_svc_column = $part_svc->part_svc_column('domsvc');
+%  my $part_svc_column = $part_svc->part_svc_column('domsvc') if $part_svc;
 %
-%  my @output = split /,/, $part_svc_column->columnvalue;
+%  my @output = split /,/, $part_svc_column->columnvalue if $part_svc_column;
+%  my $columnflag = $part_svc_column->columnflag if $part_svc_column;
 %  my @svc_domain = ();
 %  my %seen = ();
 %  
@@ -17,8 +18,7 @@
 %    $seen{$_}++;
 %  }
 %  if ($conf->exists('svc_acct-alldomains')
-%       && ( $part_svc_column->columnflag eq 'D'
-%         || $part_svc_column->columnflag eq '' )
+%       && ( $columnflag eq 'D' || $columnflag eq '' )
 %     ) {
 %    foreach (grep { $_->svcnum ne $output[0] } qsearch('svc_domain', {}) ){
 %      push @svc_domain, [ $_->svcnum => $_->domain ];



More information about the freeside-commits mailing list