Revision 74fca575
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| SL/DATEV.pm | ||
|---|---|---|
| 942 | 942 |
push @values, $form->{accnoto};
|
| 943 | 943 |
} |
| 944 | 944 |
|
| 945 |
my $where_str = ' WHERE ' . join(' AND ', map { "($_)" } @where) if (scalar @where);
|
|
| 945 |
my $where_str = @where ? ' WHERE ' . join(' AND ', map { "($_)" } @where) : '';
|
|
| 946 | 946 |
|
| 947 | 947 |
my $query = qq|SELECT c.accno, c.description |
| 948 | 948 |
FROM chart c |
Auch abrufbar als: Unified diff
Fixes für das "my $var if $cond;" pattern.