X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Famtemplates.pl;h=0045635572347460510e88339e6b1af80077a969;hb=cff1389b37e5adfde7734718a02290421aa1bf9a;hp=4bc6f017b7e09d28d4903b7c6cd2ef14ad2fb432;hpb=15c3d13829af434873b0a3a1efe4ab6fa2e00b19;p=kivitendo-erp.git diff --git a/bin/mozilla/amtemplates.pl b/bin/mozilla/amtemplates.pl index 4bc6f017b..004563557 100644 --- a/bin/mozilla/amtemplates.pl +++ b/bin/mozilla/amtemplates.pl @@ -33,6 +33,7 @@ use File::Find; +use SL::DB::Default; use SL::AM; use SL::Form; @@ -115,6 +116,9 @@ sub display_template_form { $main::auth->assert('admin'); + my $defaults = SL::DB::Default->get; + $form->error($::locale->text('No print templates have been created for this client yet. Please do so in the client configuration.')) if !$defaults->templates; + if ($form->{"formname"} =~ m|\.\.| || $form->{"formname"} =~ m|^/|) { $form->{"formname"} =~ s|.*/||; } @@ -197,6 +201,7 @@ sub display_template_form { # if ($format eq "tex") { # search all .tex-files in template dir (recursively) + my $template_dir = $defaults->templates; my @all_files; find( sub { @@ -205,13 +210,13 @@ sub display_template_form { my $fname = $File::Find::name; # remove template dir from name - $fname =~ s|^$myconfig{templates}/||; + $fname =~ s|^\Q$template_dir\E/||; # remove .tex from name $fname =~ s|.tex$||; push(@all_files, $fname); - }, $myconfig{templates}); + }, $template_dir); # filter all files already set up (i.e. not already in @values) my @other_files = grep { my $a=$_; not grep {$a eq $_->{value}} @values } @all_files; @@ -271,10 +276,7 @@ sub display_template_form { $options{"CAN_EDIT"} = $form->{"edit"}; - if ($form->{edit}) { - $form->{fokus} = "Form.content"; - - } else { + if (!$form->{edit}) { $options{"content"} = "\n\n" if (!$options{"content"}); $options{"SHOW_SECOND_EDIT_BUTTON"} = $options{"lines"} > 25; }