X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_credit_bill.pm;h=695df6e8d64911bd6e325601e947cd683e4ccffb;hp=bd76c2e1ad8b4128229bc626380e1412da31da78;hb=324f65798f7e4f28cae94a39a77260c650aa2669;hpb=eb9668a6f3181ee02cb335272c5ee4616e61fd09 diff --git a/FS/FS/cust_credit_bill.pm b/FS/FS/cust_credit_bill.pm index bd76c2e1a..695df6e8d 100644 --- a/FS/FS/cust_credit_bill.pm +++ b/FS/FS/cust_credit_bill.pm @@ -38,7 +38,7 @@ FS::cust_credit_bill - Object methods for cust_credit_bill records =head1 DESCRIPTION An FS::cust_credit_bill object represents application of a credit (see -L) to an invoice (see L). FS::cust_credit +L) to an invoice (see L). FS::cust_credit_bill inherits from FS::Record. The following fields are currently supported: =over 4 @@ -74,21 +74,6 @@ sub table { 'cust_credit_bill'; } Adds this cust_credit_bill to the database ("Posts" all or part of a credit). If there is an error, returns the error, otherwise returns false. -=cut - -sub insert { - my $self = shift; - my $error = $self->SUPER::insert(@_); - return $error if $error; - - if ( $conf->exists('invoice_send_receipts') ) { - my $send_error = $self->cust_bill->send; - warn "Error sending receipt: $send_error\n" if $send_error; - } - - ''; -} - =item delete Currently unimplemented.