X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fprovision_list.html;h=b558337dee67d3974e172ecab5c2aa4f9f3ee25e;hb=52a824f9b11ca266be10c76894eaf6607344c8d0;hp=a1a519490c1689f7e0765eedad2c95feeb77746f;hpb=b5c4237a34aef94976bc343c8d9e138664fc3984;p=freeside.git diff --git a/fs_selfservice/FS-SelfService/cgi/provision_list.html b/fs_selfservice/FS-SelfService/cgi/provision_list.html index a1a519490..b558337de 100644 --- a/fs_selfservice/FS-SelfService/cgi/provision_list.html +++ b/fs_selfservice/FS-SelfService/cgi/provision_list.html @@ -9,11 +9,14 @@ foreach my $pkg ( || scalar(@{$_->{cust_svc}}) } @cust_pkg ) { + my $susp = $pkg->{'susp'} || ''; - warn $pkg->{'pkg'}. ' '.$susp."\n"; - my @pkg_actions = ( [ 'customer_change_pkg' => 'change' ] ); - push @pkg_actions, [ 'process_suspend_pkg' => 'suspend' ] - if $self_suspend_reason and !$susp; + my @pkg_actions = (); + if ( ! $susp ) { + push @pkg_actions, [ 'customer_change_pkg' => 'change' ] unless $pkg->{'immutable'}; + push @pkg_actions, [ 'process_suspend_pkg' => 'suspend' ] + if $self_suspend_reason; + } my $bgcolor = $susp ? '"#ff9900"' : '"#8888ff"'; $OUT .= #'