Revision 8cd05ad6
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
bin/mozilla/bp.pl | ||
---|---|---|
341 | 341 |
$form->{callback} .= "&header=1" if $form->{callback}; |
342 | 342 |
|
343 | 343 |
$form->redirect($locale->text('Removed spoolfiles!')) |
344 |
if (BP->delete_spool(\%myconfig, \%$form, $main::spool));
|
|
344 |
if (BP->delete_spool(\%myconfig, \%$form)); |
|
345 | 345 |
$form->error($locale->text('Cannot remove files!')); |
346 | 346 |
|
347 | 347 |
$main::lxdebug->leave_sub(); |
... | ... | |
373 | 373 |
if ($form->{"checked_$i"}) { |
374 | 374 |
$form->info($locale->text('Printing ... ')); |
375 | 375 |
|
376 |
if (BP->print_spool(\%myconfig, \%$form, $main::spool, "| $selected_printer")) {
|
|
376 |
if (BP->print_spool(\%myconfig, \%$form, "| $selected_printer")) { |
|
377 | 377 |
print $locale->text('done'); |
378 | 378 |
$form->redirect($locale->text('Marked entries printed!')); |
379 | 379 |
} |
... | ... | |
537 | 537 |
my $i = 0; |
538 | 538 |
my $j = 0; |
539 | 539 |
my $spoolfile; |
540 |
my $spool = $::lx_office_conf{paths}->{spool}; |
|
540 | 541 |
|
541 | 542 |
foreach my $ref (@{ $form->{SPOOL} }) { |
542 | 543 |
|
... | ... | |
566 | 567 |
"<td><a href=$module?action=edit&id=$ref->{id}&type=$form->{type}&callback=$callback>$ref->{quonumber}</a></td>"; |
567 | 568 |
$column_data{name} = "<td>$ref->{name}</td>"; |
568 | 569 |
$column_data{spoolfile} = |
569 |
qq|<td><a href=$main::spool/$ref->{spoolfile}>$ref->{spoolfile}</a></td>
|
|
570 |
qq|<td><a href=$spool/$ref->{spoolfile}>$ref->{spoolfile}</a></td> |
|
570 | 571 |
<input type=hidden name="spoolfile_$i" value=$ref->{spoolfile}> |
571 | 572 |
|; |
572 | 573 |
|
Auch abrufbar als: Unified diff
Globale Variablen $::userspath, $::templates, $::membersfile nach %::lx_office_conf verschoben