From 9d658b03441384be42de580d64fefcfb43b16fd2 Mon Sep 17 00:00:00 2001 From: jeff Date: Fri, 13 Apr 2007 00:53:52 +0000 Subject: [PATCH] correct boneheaded afterthoughts --- FS/FS/svc_acct.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index be5a6d35e..a24491964 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -1637,7 +1637,7 @@ sub _op_usage { if ( &{$op2condition{$op}}($self, $column, $amount) ) { foreach my $part_export ( $self->cust_svc->part_svc->part_export ) { - if ($part_export->option('overlimit_groups'), 1) { + if ($part_export->option('overlimit_groups')) { my ($new,$old); my $other = new FS::svc_acct $self->hashref; my $groups = &{ $self->_fieldhandlers->{'usergroup'} } @@ -1760,7 +1760,7 @@ sub set_usage { my $error = $self->overlimit('unsuspend'); foreach my $part_export ( $self->cust_svc->part_svc->part_export ) { - if ($part_export->option('overlimit_groups'), 1) { + if ($part_export->option('overlimit_groups')) { my $old = new FS::svc_acct $self->hashref; my $groups = &{ $self->_fieldhandlers->{'usergroup'} } ($self, $part_export->option('overlimit_groups')); -- 2.11.0