|
Lines 691-697
sub GetPreparedLetter {
Link Here
|
| 691 |
|
691 |
|
| 692 |
my $tables = $params{tables} || {}; |
692 |
my $tables = $params{tables} || {}; |
| 693 |
my $substitute = $params{substitute} || {}; |
693 |
my $substitute = $params{substitute} || {}; |
| 694 |
my $loops = $params{loops} || {}; # loops is not supported for history syntax |
694 |
my $loops = $params{loops} || {}; # loops is not supported for historical notices syntax |
| 695 |
my $repeat = $params{repeat}; |
695 |
my $repeat = $params{repeat}; |
| 696 |
%$tables || %$substitute || $repeat || %$loops |
696 |
%$tables || %$substitute || $repeat || %$loops |
| 697 |
or carp( "ERROR: nothing to substitute - both 'tables', 'loops' and 'substitute' are empty" ), |
697 |
or carp( "ERROR: nothing to substitute - both 'tables', 'loops' and 'substitute' are empty" ), |
| 698 |
- |
|
|