projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Spool-Dateien: Handling vom wiederholten Spoolen desselben Beleges gefixt
[kivitendo-erp.git]
/
SL
/
Template
/
OpenDocument.pm
diff --git
a/SL/Template/OpenDocument.pm
b/SL/Template/OpenDocument.pm
index
2ed3c60
..
12a7bc8
100644
(file)
--- a/
SL/Template/OpenDocument.pm
+++ b/
SL/Template/OpenDocument.pm
@@
-22,7
+22,7
@@
sub new {
my $self = $type->SUPER::new(@_);
$self->{"rnd"} = int(rand(1000000));
my $self = $type->SUPER::new(@_);
$self->{"rnd"} = int(rand(1000000));
- $self->{"iconv"} = SL::Iconv->new($
main::dbcharset
, "UTF-8");
+ $self->{"iconv"} = SL::Iconv->new($
::lx_office_conf{system}->{dbcharset}
, "UTF-8");
$self->set_tag_style('<%', '%>');
$self->{quot_re} = '"';
$self->set_tag_style('<%', '%>');
$self->{quot_re} = '"';
@@
-37,7
+37,7
@@
sub parse_foreach {
my $ary = $self->_get_loop_variable($var, 1, @indices);
my $ary = $self->_get_loop_variable($var, 1, @indices);
- for (my $i = 0; $i < scalar(@{$ary}); $i++) {
+ for (my $i = 0; $i < scalar(@{$ary
|| []
}); $i++) {
$form->{"__first__"} = $i == 0;
$form->{"__last__"} = ($i + 1) == scalar(@{$ary});
$form->{"__odd__"} = (($i + 1) % 2) == 1;
$form->{"__first__"} = $i == 0;
$form->{"__last__"} = ($i + 1) == scalar(@{$ary});
$form->{"__odd__"} = (($i + 1) % 2) == 1;
@@
-382,14
+382,14
@@
sub spawn_xvfb {
my $pid = fork();
if (0 == $pid) {
$main::lxdebug->message(LXDebug->DEBUG2(), " Child execing\n");
my $pid = fork();
if (0 == $pid) {
$main::lxdebug->message(LXDebug->DEBUG2(), " Child execing\n");
- exec($
main::xvfb_bin
, $display, "-screen", "0", "640x480x8", "-nolisten", "tcp");
+ exec($
::lx_office_conf{applications}->{xvfb}
, $display, "-screen", "0", "640x480x8", "-nolisten", "tcp");
}
sleep(3);
$main::lxdebug->message(LXDebug->DEBUG2(), " parent dont sleeping\n");
local *OUT;
my $dfname = $self->{"userspath"} . "/xvfb_display";
}
sleep(3);
$main::lxdebug->message(LXDebug->DEBUG2(), " parent dont sleeping\n");
local *OUT;
my $dfname = $self->{"userspath"} . "/xvfb_display";
- if (!open(OUT, ">
$dfname"
)) {
+ if (!open(OUT, ">
", $dfname
)) {
$self->{"error"} = "Conversion to PDF failed because OpenOffice could not be started ($dfname: $!)";
unlink($xauthority);
kill($pid);
$self->{"error"} = "Conversion to PDF failed because OpenOffice could not be started ($dfname: $!)";
unlink($xauthority);
kill($pid);
@@
-419,7
+419,8
@@
sub spawn_xvfb {
sub is_openoffice_running {
$main::lxdebug->enter_sub();
sub is_openoffice_running {
$main::lxdebug->enter_sub();
- my $output = `./scripts/oo-uno-test-conn.py $main::openofficeorg_daemon_port 2> /dev/null`;
+ my $cmd = "./scripts/oo-uno-test-conn.py " . $::lx_office_conf{print_templates}->{openofficeorg_daemon_port} . " 2> /dev/null";
+ my $output = `$cmd`;
chomp $output;
my $res = ($? == 0) || $output;
chomp $output;
my $res = ($? == 0) || $output;
@@
-457,11
+458,11
@@
sub spawn_openoffice {
exit if ($new_pid);
my $ssres = setsid();
$main::lxdebug->message(LXDebug->DEBUG2(), " Child execing\n");
exit if ($new_pid);
my $ssres = setsid();
$main::lxdebug->message(LXDebug->DEBUG2(), " Child execing\n");
- my @cmdline = ($
main::openofficeorg_writer_bin
,
+ my @cmdline = ($
::lx_office_conf{applications}->{openofficeorg_writer}
,
"-minimized", "-norestore", "-nologo", "-nolockcheck",
"-headless",
"-accept=socket,host=localhost,port=" .
"-minimized", "-norestore", "-nologo", "-nolockcheck",
"-headless",
"-accept=socket,host=localhost,port=" .
- $
main::openofficeorg_daemon_port
. ";urp;");
+ $
::lx_office_conf{print_templates}->{openofficeorg_daemon_port}
. ";urp;");
exec(@cmdline);
}
exec(@cmdline);
}
@@
-508,8
+509,8
@@
sub convert_to_pdf {
}
my @cmdline;
}
my @cmdline;
- if (!$
main::openofficeorg_daemon
) {
- @cmdline = ($
main::openofficeorg_writer_bin
,
+ if (!$
::lx_office_conf{print_templates}->{openofficeorg_daemon}
) {
+ @cmdline = ($
::lx_office_conf{applications}->{openofficeorg_writer}
,
"-minimized", "-norestore", "-nologo", "-nolockcheck",
"-headless",
"file:${filename}.odt",
"-minimized", "-norestore", "-nologo", "-nolockcheck",
"-headless",
"file:${filename}.odt",
@@
-522,7
+523,7
@@
sub convert_to_pdf {
}
@cmdline = ("./scripts/oo-uno-convert-pdf.py",
}
@cmdline = ("./scripts/oo-uno-convert-pdf.py",
- $
main::openofficeorg_daemon_port
,
+ $
::lx_office_conf{print_templates}->{openofficeorg_daemon_port}
,
"${filename}.odt");
}
"${filename}.odt");
}