checklist is the proper has value throughout.
This commit is contained in:
parent
1039f6f6d2
commit
167d8c9520
1 changed files with 2 additions and 2 deletions
|
@ -99,7 +99,7 @@ foreach my $id (@supporterIds) {
|
||||||
$lines{$sizeNeeded}{checklist} = [] unless defined $lines{$sizeNeeded}{checklist};
|
$lines{$sizeNeeded}{checklist} = [] unless defined $lines{$sizeNeeded}{checklist};
|
||||||
$lines{$sizeNeeded}{labels} .= '\mlabel{}{TO: \\\\ ' . join(' \\\\ ', split('\n', $latexPostal)) . "}\n";
|
$lines{$sizeNeeded}{labels} .= '\mlabel{}{TO: \\\\ ' . join(' \\\\ ', split('\n', $latexPostal)) . "}\n";
|
||||||
my $shortLatexPostal = latex_encode(sprintf('%-30.30s', join(" ", reverse split('\n', $postalAddresses[0]))));
|
my $shortLatexPostal = latex_encode(sprintf('%-30.30s', join(" ", reverse split('\n', $postalAddresses[0]))));
|
||||||
push(@{$lines{$sizeNeeded}{checklst}}, '{ $\Box$} &' . sprintf("%-3d & %5s & %-30s & %s ",
|
push(@{$lines{$sizeNeeded}{checklist}}, '{ $\Box$} &' . sprintf("%-3d & %5s & %-30s & %s ",
|
||||||
$id, encode('UTF-8', $sp->getLedgerEntityId($id)),
|
$id, encode('UTF-8', $sp->getLedgerEntityId($id)),
|
||||||
encode('UTF-8', $sizeNeeded),
|
encode('UTF-8', $sizeNeeded),
|
||||||
$shortLatexPostal) .
|
$shortLatexPostal) .
|
||||||
|
@ -107,7 +107,7 @@ foreach my $id (@supporterIds) {
|
||||||
}
|
}
|
||||||
my $lineCount = 0;
|
my $lineCount = 0;
|
||||||
foreach my $size (sort { $a cmp $b } keys %lines) {
|
foreach my $size (sort { $a cmp $b } keys %lines) {
|
||||||
foreach my $line (@{$lines{$size}{boxes}}) {
|
foreach my $line (@{$lines{$size}{checklist}}) {
|
||||||
if ($lineCount++ > 40) {
|
if ($lineCount++ > 40) {
|
||||||
$lineCount = 0;
|
$lineCount = 0;
|
||||||
print LIST "\n\n", '\end{tabular}',"\n\\pagebreak\n\\begin{tabular}{|l|l|l|l|l|} \\hline\n";
|
print LIST "\n\n", '\end{tabular}',"\n\\pagebreak\n\\begin{tabular}{|l|l|l|l|l|} \\hline\n";
|
||||||
|
|
Loading…
Reference in a new issue