diff --git a/lib/WebGUI/Mailing.pm b/lib/WebGUI/Mailing.pm index 86d3602..e2723e8 100644 --- a/lib/WebGUI/Mailing.pm +++ b/lib/WebGUI/Mailing.pm @@ -403,11 +403,14 @@ sub www_previewEmail { my $subject = $asset->getSubject( $self->get('configuration') ); my $userSelection = -'
- Kies een gebruiker: - -
-
'; + qq{ +

Terug naar de mailing manager.

+ +
+ +
+
+ }; my $js = $self->getAutoCompleteJS; @@ -427,8 +430,6 @@ sub www_previewEmail { - - @@ -445,36 +446,49 @@ EOHTML sub getAutoCompleteJS { my $self = shift; + my $session = $self->session; my $url = $self->session->url; my $jsonUrl = $url->page( 'newsletter=mailing;func=getRecipientsList;id='.$self->getId .';'); my $contentBase = $url->page( "newsletter=mailing;func=previewContent;id=".$self->getId ); + my $data = to_json( [ + map { { + id => $_->getId, + name => $_->username . " (" . $_->get('email') . ")", + } } + grep { defined $_ } + map { WebGUI::User->new( $session, $_ ) } + @{ $self->getAsset->getRecipients } + ] ); + return <