X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fio.pl;h=2afa3bb2717da10a2c96ed2d268b15c224765f53;hb=2fda509c7dc417aad28ed072e91e8ffe2396314d;hp=d85c367c2dcdaf6ec256744ed1108b20d83c17fb;hpb=a0f6a00c1db8152633841777a95f5420b56b42ee;p=kivitendo-erp.git diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index d85c367c2..2afa3bb27 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -38,14 +38,14 @@ use SL::IC; use CGI::Ajax; use CGI; -require "$form->{path}/common.pl"; +require "bin/mozilla/common.pl"; # any custom scripts for this one -if (-f "$form->{path}/custom_io.pl") { - eval { require "$form->{path}/custom_io.pl"; }; +if (-f "bin/mozilla/custom_io.pl") { + eval { require "bin/mozilla/custom_io.pl"; }; } -if (-f "$form->{path}/$form->{login}_io.pl") { - eval { require "$form->{path}/$form->{login}_io.pl"; }; +if (-f "bin/mozilla/$form->{login}_io.pl") { + eval { require "bin/mozilla/$form->{login}_io.pl"; }; } 1; @@ -822,7 +822,7 @@ sub new_item { . $locale->text('Service'); print $cgi->hidden("-name" => "previousform", "-value" => $previousform); map({ print($cgi->hidden("-name" => $_, "-value" => $form->{$_})); } - ("rowcount", "vc", "path", "login", "password")); + qw(rowcount vc login password)); map({ print($cgi->hidden("-name" => $_, "-value" => $form->{"$__$i"})); } ("partnumber", "description")); print $cgi->hidden("-name" => "taxaccount2", "-value" => $form->{taxaccounts}); @@ -1150,7 +1150,7 @@ sub order { $form->{cp_id} *= 1; - require "$form->{path}/$form->{script}"; + require "bin/mozilla/$form->{script}"; my $script = $form->{"script"}; $script =~ s|.*/||; $script =~ s|.pl$||; @@ -1214,7 +1214,7 @@ sub quotation { $form->{rowcount}--; - require "$form->{path}/$form->{script}"; + require "bin/mozilla/$form->{script}"; map { $form->{"select$_"} = "" } ($form->{vc}, currency); @@ -1256,33 +1256,21 @@ sub edit_e_mail { $form->{print_and_post} = 0; $form->{resubmit} = 0; } - if ($myconfig{role} eq 'admin') { - $bcc = qq| -