projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
IS: Departments anzeigen.
[kivitendo-erp.git]
/
bin
/
mozilla
/
amtemplates.pl
diff --git
a/bin/mozilla/amtemplates.pl
b/bin/mozilla/amtemplates.pl
index
9843f82
..
839fbf2
100644
(file)
--- a/
bin/mozilla/amtemplates.pl
+++ b/
bin/mozilla/amtemplates.pl
@@
-36,6
+36,8
@@
use SL::Form;
use Data::Dumper;
use Data::Dumper;
+use strict;
+
1;
require "bin/mozilla/common.pl";
1;
require "bin/mozilla/common.pl";
@@
-43,43
+45,51
@@
require "bin/mozilla/common.pl";
# end of main
sub display {
# end of main
sub display {
- call_sub($form->{display_nextsub});
+ call_sub($
main::
form->{display_nextsub});
}
sub save {
}
sub save {
- call_sub($form->{save_nextsub});
+ call_sub($
main::
form->{save_nextsub});
}
sub edit {
}
sub edit {
- call_sub($form->{edit_nextsub});
+ call_sub($
main::
form->{edit_nextsub});
}
sub display_template {
}
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();
$form->{edit} = 0;
display_template_form();
- $lxdebug->leave_sub();
+ $
main::
lxdebug->leave_sub();
}
sub edit_template {
}
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();
$form->{edit} = 1;
display_template_form();
- $lxdebug->leave_sub();
+ $
main::
lxdebug->leave_sub();
}
sub save_template {
}
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");
$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();
$form->{edit} = 0;
display_template_form();
- $lxdebug->leave_sub();
+ $
main::
lxdebug->leave_sub();
}
sub display_template_form {
}
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";
$form->{"formname"} =~ s|.*/||;
my $format = $form->{"format"} eq "html" ? "html" : "tex";
@@
-233,7
+247,7
@@
sub display_template_form {
$form->header;
print($form->parse_html_template("am/edit_templates", \%options));
$form->header;
print($form->parse_html_template("am/edit_templates", \%options));
- $lxdebug->leave_sub();
+ $
main::
lxdebug->leave_sub();
}
1;
}
1;