Revision e985baa7
Von Moritz Bunkus vor etwa 12 Jahren hinzugefügt
| SL/Controller/CsvImport/Base.pm | ||
|---|---|---|
|
my @cleaned_fields;
|
||
|
foreach my $field (grep { $object->can($_) } @fields) {
|
||
|
my $value = $object->$field;
|
||
|
$::lxdebug->message(0, "field $field value $value ill $illegal_chars");
|
||
|
|
||
|
next unless defined($value) && ($value =~ s/$illegal_chars/ /g);
|
||
|
|
||
Auch abrufbar als: Unified diff
Evil debug output removal