[freeside-commits] freeside/FS/FS/part_event/Action cust_bill_email.pm, NONE, 1.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_event/Action
In directory wavetail.420.am:/tmp/cvs-serv23348

Added Files:
	cust_bill_email.pm 
Log Message:
add cust_bill_email action

--- NEW FILE: cust_bill_email.pm ---
package FS::part_event::Action::cust_bill_email;

use strict;
use base qw( FS::part_event::Action );

sub description { 'Send invoice (email only)'; }

sub eventtable_hashref {
  { 'cust_bill' => 1 };
}

sub default_weight { 51; }

sub do_action {
  my( $self, $cust_bill ) = @_;

  #my $cust_main = $self->cust_main($cust_bill);
  my $cust_main = $cust_bill->cust_main;

  $cust_bill->email;
}

1;