Revision d3d6717e
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
SL/WH.pm | ||
---|---|---|
659 | 659 |
qw(l_parts_id l_qty l_partunit) ); |
660 | 660 |
|
661 | 661 |
# add cvar for sorting |
662 |
if ($form->{sort} =~ /^cvar_/) {
|
|
662 |
if (($form->{sort} // '') =~ /^cvar_/) {
|
|
663 | 663 |
my $sort_name = $form->{sort}; |
664 | 664 |
my $cvar_name = $sort_name; |
665 | 665 |
$cvar_name =~ s/^cvar_//; |
Auch abrufbar als: Unified diff
SL:WH: nicht initialisierter Wert: Warnungen vermeiden