UnitedKnowledge/webgui_newsletter
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Refactor preview

Browse source
This commit is contained in:
Martin Kamerbeek 2010-05-19 17:42:49 +02:00
parent 04f39ebc19
commit 4a9cbfd91c
4 changed files with 62 additions and 57 deletions
Download patch file Download diff file Expand all files Collapse all files

57
lib/WebGUI/Mailing.pm
View file

@ -166,6 +166,63 @@ sub www_edit {
return WebGUI::Mailing::Admin->new($session)->getAdminConsole->render( $f->print, 'Configure mailing' );
}
#----------------------------------------------------------------------------
sub www_previewContent {
my $self = shift;
my $form = $self->session->form;
my $issueId = $self->get('issueId');
my $userId = $form->get('userId');
return $self->getAsset->processContentAsUser( $issueId, $userId, $self->get('configuration') );
}
#----------------------------------------------------------------------------
sub www_previewEmail {
my $self = shift;
my $session = $self->session;
my ( $form, $url ) = $session->quick( 'form', 'url' );
my $asset = $self->getAsset;
my %recipients =
map { $_->getId => $_->username }
map { WebGUI::User->new( $session, $_ ) }
@{ $asset->getRecipients };
my $userId = $form->get('userId') || ( %recipients )[0];
my $manageUrl = $url->page('newsletter=manage');
my $contentUrl = $url->page( "newsletter=mailing;func=previewContent;userId=$userId;id=".$self->getId );
my $subject = $asset->getSubject( $self->get('configuration') );
my $userSelection =
WebGUI::Form::formHeader( $session )
. WebGUI::Form::hidden( $session, { name => 'newsletter', value => 'mailing' } )
. WebGUI::Form::hidden( $session, { name => 'func', value => 'previewEmail' } )
. WebGUI::Form::hidden( $session, { name => 'id', value => $self->getId } )
. WebGUI::Form::selectBox( $session, {
name => 'userId',
options => \%recipients,
value => $userId,
} )
. WebGUI::Form::submit( $session, { value => 'Switch' } )
. " <a href=\"$manageUrl\">Return to newsletter manager</a>"
. WebGUI::Form::formFooter( $session );
return <<EOHTML;
<html>
<head>
</head>
<body>
$userSelection
<b>Subject :</b>$subject
<iframe src="$contentUrl" id="previewFrame" style="width: 100%; height: 90%">
</iframe>
</body>
</html>
EOHTML
}
sub www_editSave {
my $self = shift;
my $session = $self->session;