Revision fb1a574b
Von Sven Schöling vor mehr als 8 Jahren hinzugefügt
SL/Helper/Csv/Dispatcher.pm | ||
---|---|---|
99 | 99 |
} |
100 | 100 |
|
101 | 101 |
sub is_known { |
102 |
my ($self, $col) = @_; |
|
103 |
return grep { $col eq $_->{key} } $self->_specs;
|
|
102 |
my ($self, $col, $row) = @_;
|
|
103 |
return grep { $col eq $_->{key} } @{ $self->_specs->[$row // 0] };
|
|
104 | 104 |
} |
105 | 105 |
|
106 | 106 |
sub parse_profile { |
Auch abrufbar als: Unified diff
Helper::Csv: is_known in dispatcher gefixt