|
Lines 618-623
sub GetPreparedLetter {
Link Here
|
| 618 |
return; |
618 |
return; |
| 619 |
my $want_librarian = $params{want_librarian}; |
619 |
my $want_librarian = $params{want_librarian}; |
| 620 |
|
620 |
|
|
|
621 |
|
| 622 |
$letter->{content} = _process_tt( |
| 623 |
{ |
| 624 |
content => $letter->{content}, |
| 625 |
lang => $lang, |
| 626 |
loops => $loops, |
| 627 |
objects => $objects, |
| 628 |
substitute => $substitute, |
| 629 |
tables => $tables, |
| 630 |
} |
| 631 |
); |
| 632 |
|
| 621 |
if (%$substitute) { |
633 |
if (%$substitute) { |
| 622 |
while ( my ($token, $val) = each %$substitute ) { |
634 |
while ( my ($token, $val) = each %$substitute ) { |
| 623 |
$val //= q{}; |
635 |
$val //= q{}; |
|
Lines 688-704
sub GetPreparedLetter {
Link Here
|
| 688 |
} |
700 |
} |
| 689 |
} |
701 |
} |
| 690 |
|
702 |
|
| 691 |
$letter->{content} = _process_tt( |
|
|
| 692 |
{ |
| 693 |
content => $letter->{content}, |
| 694 |
lang => $lang, |
| 695 |
loops => $loops, |
| 696 |
objects => $objects, |
| 697 |
substitute => $substitute, |
| 698 |
tables => $tables, |
| 699 |
} |
| 700 |
); |
| 701 |
|
| 702 |
$letter->{title} = _process_tt( |
703 |
$letter->{title} = _process_tt( |
| 703 |
{ |
704 |
{ |
| 704 |
content => $letter->{title}, |
705 |
content => $letter->{title}, |
| 705 |
- |
|
|