summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2004-11-09 08:15:38 +0000
committerivan <ivan>2004-11-09 08:15:38 +0000
commit4e49e165948848ce864765b0b3f859bad1dc1019 (patch)
tree507640a8942d183db4ae1ea5902622a8c0158d11
parent0c52e96b47c207f73c68e9cdab0dc8c5654c4e5c (diff)
don't generate invoices for COMP customers
-rw-r--r--FS/FS/cust_main.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 070a888d4..011308ca0 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1098,6 +1098,7 @@ If there is an error, returns the error, otherwise returns false.
sub bill {
my( $self, %options ) = @_;
+ return '' if $self->payby eq 'COMP';
my $time = $options{'time'} || time;
my $error;