sub display_template {
$lxdebug->enter_sub();
+ $auth->assert('config');
+
$form->{edit} = 0;
display_template_form();
sub edit_template {
$lxdebug->enter_sub();
+ $auth->assert('config');
+
$form->{edit} = 1;
display_template_form();
sub save_template {
$lxdebug->enter_sub();
+ $auth->assert('config');
+
$form->isblank("formname", $locale->text("You're not editing a file.")) unless ($form->{type} eq "stylesheet");
my ($filename) = AM->prepare_template_filename(\%myconfig, $form);
sub display_template_form {
$lxdebug->enter_sub();
+ $auth->assert('config');
+
$form->{"formname"} =~ s|.*/||;
my $format = $form->{"format"} eq "html" ? "html" : "tex";
my %options;
- my @hidden = qw(login password type format);
+ my @hidden = qw(type format);
if (($form->{"type"} ne "stylesheet") && !$form->{"edit"}) {
$options{"SHOW_EDIT_OPTIONS"} = 1;
push(@values,
{ "value" => $file,
- "label" => ref($setup) ? $setup->{"translation"} : $setup,
- "default" => $file eq $form->{"formname"} });
+ "label" => ref($setup) ? $setup->{"translation"} : $setup });
}
# "zahlungserinnerung" => $locale->text('Payment Reminder'),
next if !$ref->{"template"};
push(@values,
- { "value" => $ref->{"template"},
- "label" => $locale->text('Payment Reminder') . ": " . $ref->{"dunning_description"},
- "default" => $ref->{"template"} eq $form->{"formname"} });
+ { "value" => $ref->{"template"},
+ "label" => $locale->text('Payment Reminder') . ": " . $ref->{"dunning_description"} },
+ { "value" => $ref->{"template"} . "_invoice",
+ "label" => $locale->text('Payment Reminder') . ": " . $ref->{"dunning_description"} . ' (' . $locale->text("Invoice for fees") . ')' });
}
@values = sort({ $a->{"label"} cmp $b->{"label"} } @values);
- $options{"FORMNAME"} = [ @values ];
+ $options{FORMNAME} = [ @values ];
#
# Setup "language" selection
#
- @values = ( { "value" => "", "label" => "", "default" => 0 } );
+ @values = ();
foreach my $item (@{ $form->{"ALL_LANGUAGES"} }) {
next unless ($item->{"template_code"});
- my $key = "$item->{id}--$item->{template_code}";
-
push(@values,
- { "value" => $key,
- "label" => $item->{"description"},
- "default" => $key eq $form->{"language"} });
+ { "value" => "$item->{id}--$item->{template_code}",
+ "label" => $item->{"description"} });
}
- $options{"LANGUAGE"} = [ @values ];
- $options{"SHOW_LANGUAGE"} = scalar(@values) > 1;
-
- @values = ( { "value" => "", "label" => "", "default" => 0 } );
+ $options{LANGUAGE} = [ @values ];
#
# Setup "printer" selection
#
+ @values = ();
+
foreach my $item (@{ $form->{"ALL_PRINTERS"} }) {
next unless ($item->{"template_code"});
- my $key = "$item->{id}--$item->{template_code}";
-
push(@values,
- { "value" => $key,
- "label" => $item->{"printer_description"},
- "default" => $key eq $form->{"printer"} });
+ { "value" => "$item->{id}--$item->{template_code}",
+ "label" => $item->{"printer_description"} });
}
- $options{"PRINTER"} = [ @values ];
- $options{"SHOW_PRINTER"} = scalar(@values) > 1;
+ $options{PRINTER} = [ @values ];
} else {
push(@hidden, qw(formname language printer));