X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Famtemplates.pl;h=839fbf21fe5aff5fbc7262eeb828419d0754d17b;hb=5ee57de8a130f13418e9013102963e4336e72f6d;hp=1ef16c1eba371e726da90865e534a22156efecb2;hpb=8c7e44938a661e035f62840e1e177353240ace5d;p=kivitendo-erp.git diff --git a/bin/mozilla/amtemplates.pl b/bin/mozilla/amtemplates.pl index 1ef16c1eb..839fbf21f 100644 --- a/bin/mozilla/amtemplates.pl +++ b/bin/mozilla/amtemplates.pl @@ -36,6 +36,8 @@ use SL::Form; use Data::Dumper; +use strict; + 1; require "bin/mozilla/common.pl"; @@ -43,43 +45,51 @@ require "bin/mozilla/common.pl"; # end of main sub display { - call_sub($form->{display_nextsub}); + call_sub($main::form->{display_nextsub}); } sub save { - call_sub($form->{save_nextsub}); + call_sub($main::form->{save_nextsub}); } sub edit { - call_sub($form->{edit_nextsub}); + call_sub($main::form->{edit_nextsub}); } sub display_template { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); + + my $form = $main::form; - $auth->assert('config'); + $main::auth->assert('config'); $form->{edit} = 0; display_template_form(); - $lxdebug->leave_sub(); + $main::lxdebug->leave_sub(); } sub edit_template { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); + + my $form = $main::form; - $auth->assert('config'); + $main::auth->assert('config'); $form->{edit} = 1; display_template_form(); - $lxdebug->leave_sub(); + $main::lxdebug->leave_sub(); } sub save_template { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); - $auth->assert('config'); + my $form = $main::form; + my %myconfig = %main::myconfig; + my $locale = $main::locale; + + $main::auth->assert('config'); $form->isblank("formname", $locale->text("You're not editing a file.")) unless ($form->{type} eq "stylesheet"); @@ -91,13 +101,17 @@ sub save_template { $form->{edit} = 0; display_template_form(); - $lxdebug->leave_sub(); + $main::lxdebug->leave_sub(); } sub display_template_form { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); + + my $form = $main::form; + my %myconfig = %main::myconfig; + my $locale = $main::locale; - $auth->assert('config'); + $main::auth->assert('config'); $form->{"formname"} =~ s|.*/||; my $format = $form->{"format"} eq "html" ? "html" : "tex"; @@ -163,7 +177,9 @@ sub display_template_form { push(@values, { "value" => $ref->{"template"}, - "label" => $locale->text('Payment Reminder') . ": " . $ref->{"dunning_description"} }); + "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); @@ -231,7 +247,7 @@ sub display_template_form { $form->header; print($form->parse_html_template("am/edit_templates", \%options)); - $lxdebug->leave_sub(); + $main::lxdebug->leave_sub(); } 1;