Add basic infrastructure to actually send out mailings.
This commit is contained in:
parent
3f3ee717b7
commit
80c1ce0b44
4 changed files with 99 additions and 5 deletions
|
|
@ -93,10 +93,10 @@ sub getRecipients {
|
|||
#----------------------------------------------------------------------------
|
||||
sub generateEmailContent {
|
||||
my $self = shift;
|
||||
my $issueId = shift;
|
||||
my $session = $self->session;
|
||||
my $form = $session->form;
|
||||
|
||||
my $issueId = $form->get('issueId');
|
||||
my $issue = WebGUI::Asset->newByDynamicClass( $session, $issueId );
|
||||
|
||||
return "Invalid issueId [$issueId]" unless $issue;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue