Revision acd55c9d
Von Bernd Bleßmann vor etwa 2 Jahren hinzugefügt
| SL/DB/Shipto.pm | ||
|---|---|---|
|
# todo: consider cvars
|
||
|
my @fields_to_consider = grep { !m{^ (?: itime | mtime | shipto_id | trans_id | shiptocp_gender | module ) $}x } map {$_->name} $self->meta->columns;
|
||
|
|
||
|
return all { trim($self->$_) eq '' } @fields_to_consider;
|
||
|
return all { (trim($self->$_)||'') eq '' } @fields_to_consider;
|
||
|
}
|
||
|
|
||
|
sub detach {
|
||
Auch abrufbar als: Unified diff
S:D:Shipto: undef-Warnung vermeiden