Revision 369f24c6
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/dn.pl | ||
|---|---|---|
| 231 | 231 |
sub set_email {
|
| 232 | 232 |
$lxdebug->enter_sub(); |
| 233 | 233 |
|
| 234 |
|
|
| 235 |
my $callback = "$form->{script}?action=set_email&";
|
|
| 236 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
|
| 237 |
(qw(login password name input_subject input_body input_attachment email_subject email_body email_attachment), grep({ /^[fl]_/ } keys %$form)));
|
|
| 238 |
|
|
| 239 |
if ($form->{email_attachment}) {
|
|
| 240 |
$form->{email_attachment} = "checked";
|
|
| 241 |
} |
|
| 242 | 234 |
$form->{"title"} = $locale->text("Set eMail text");
|
| 243 | 235 |
$form->header(); |
| 244 | 236 |
print($form->parse_html_template("dunning/set_email"));
|
Auch abrufbar als: Unified diff
Überflüssiger Code.