Add cancel buttons to sendTestMail and sendBatch
This commit is contained in:
parent
0221e48476
commit
6010aa947f
3 changed files with 36 additions and 3 deletions
|
|
@ -536,7 +536,17 @@ sub www_sendBatch {
|
||||||
name => 'sendDate',
|
name => 'sendDate',
|
||||||
label => $i18n->get( 'send mailing at' ),
|
label => $i18n->get( 'send mailing at' ),
|
||||||
);
|
);
|
||||||
$f->submit;
|
$f->submit(
|
||||||
|
value => $i18n->get( 'schedule' ),
|
||||||
|
extras => qq{class="forwardButton"},
|
||||||
|
);
|
||||||
|
my $cancelUrl = $session->url->page( 'newsletter=manage' );
|
||||||
|
$f->button(
|
||||||
|
value => $i18n->get( 'cancel' ),
|
||||||
|
extras => qq{onclick="window.location='$cancelUrl'" class="backwardButton"},
|
||||||
|
);
|
||||||
|
|
||||||
|
return WebGUI::Mailing::Admin->new($session)->getAdminConsole->render( $f->print, 'Send test emails' );
|
||||||
|
|
||||||
return WebGUI::Mailing::Admin->new($session)->getAdminConsole->render( $f->print, $i18n->get('schedule mailing') );
|
return WebGUI::Mailing::Admin->new($session)->getAdminConsole->render( $f->print, $i18n->get('schedule mailing') );
|
||||||
}
|
}
|
||||||
|
|
@ -626,9 +636,17 @@ sub www_sendTestEmails {
|
||||||
multiple=> 1,
|
multiple=> 1,
|
||||||
options => \%options,
|
options => \%options,
|
||||||
);
|
);
|
||||||
$f->submit( $i18n->get('send test mails') );
|
$f->submit(
|
||||||
|
value => $i18n->get('send test mails'),
|
||||||
|
extras => qq{class="forwardButton"},
|
||||||
|
);
|
||||||
|
my $cancelUrl = $session->url->page( 'newsletter=manage' );
|
||||||
|
$f->button(
|
||||||
|
value => $i18n->get( 'cancel' ),
|
||||||
|
extras => qq{onclick="window.location='$cancelUrl'" class="backwardButton"},
|
||||||
|
);
|
||||||
|
|
||||||
return $f->print;
|
return WebGUI::Mailing::Admin->new($session)->getAdminConsole->render( $f->print, 'Send test emails' );
|
||||||
}
|
}
|
||||||
|
|
||||||
#----------------------------------------------------------------------------
|
#----------------------------------------------------------------------------
|
||||||
|
|
|
||||||
|
|
@ -58,6 +58,13 @@ our $I18N = {
|
||||||
message => 'Verstuur test emails',
|
message => 'Verstuur test emails',
|
||||||
},
|
},
|
||||||
|
|
||||||
|
'schedule' => {
|
||||||
|
message => 'Inroosteren',
|
||||||
|
},
|
||||||
|
'cancel' => {
|
||||||
|
message => 'Afbreken',
|
||||||
|
},
|
||||||
|
|
||||||
};
|
};
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
|
||||||
|
|
@ -57,6 +57,14 @@ our $I18N = {
|
||||||
'send test mails' => {
|
'send test mails' => {
|
||||||
message => 'Send test emails',
|
message => 'Send test emails',
|
||||||
},
|
},
|
||||||
|
|
||||||
|
'schedule' => {
|
||||||
|
message => 'Schedule',
|
||||||
|
},
|
||||||
|
'cancel' => {
|
||||||
|
message => 'Cancel',
|
||||||
|
},
|
||||||
|
|
||||||
};
|
};
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue