Bug 18177: remove aqbooksellers.bookselleremail
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
parent
a961487d65
commit
6070492462
|
|
@ -449,7 +449,6 @@ sub SendAlerts {
|
|||
|
||||
my @email;
|
||||
my @cc;
|
||||
push @email, $databookseller->{bookselleremail} if $databookseller->{bookselleremail};
|
||||
push @email, $datacontact->{email} if ( $datacontact && $datacontact->{email} );
|
||||
unless (@email) {
|
||||
warn "Bookseller $dataorders->[0]->{booksellerid} without emails";
|
||||
|
|
|
|||
|
|
@ -85,7 +85,6 @@ on the API.
|
|||
|
||||
sub to_api_mapping {
|
||||
return {
|
||||
bookselleremail => undef,
|
||||
currency => undef,
|
||||
listprice => 'list_currency',
|
||||
invoiceprice => 'invoice_currency',
|
||||
|
|
|
|||
|
|
@ -765,7 +765,6 @@ sub field_filter {
|
|||
my ($struct) = @_;
|
||||
|
||||
for my $field (
|
||||
'bookselleremail',
|
||||
'currency', 'invoiceprice',
|
||||
'listprice', 'contacts'
|
||||
)
|
||||
|
|
|
|||
Loading…
Reference in New Issue